Details

analyze8.6s (8.2%)

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.8%	0.2%	0%	0%	0%	0
0%	0%	99.8%	0.2%	0%	0%	0%	1
0%	0%	99.8%	0.2%	0%	0%	0%	2
0%	0%	99.8%	0.2%	0%	0%	0%	3
0%	0%	99.8%	0.2%	0%	0%	0%	4
0%	0%	99.8%	0.2%	0%	0%	0%	5
0%	0%	99.8%	0.2%	0%	0%	0%	6
0%	0%	99.8%	0.2%	0%	0%	0%	7
0%	0%	99.8%	0.2%	0%	0%	0%	8
0%	0%	99.8%	0.2%	0%	0%	0%	9
0%	0%	99.8%	0.2%	0%	0%	0%	10
0%	0%	99.8%	0.2%	0%	0%	0%	11
0%	0%	99.8%	0.2%	0%	0%	0%	12

Compiler

Compiled 189 to 125 computations (33.9% saved)

sample33.6s (32.1%)

Results

11.5s	1955×	body	1024	valid
6.3s	5139×	body	256	valid
6.2s	1051×	body	1024	infinite
3.5s	944×	body	512	valid
2.6s	2142×	body	256	infinite
1.8s	216×	body	2048	valid
1.6s	496×	body	512	infinite
53.0ms	2×	body	4096	valid

Bogosity

preprocess102.0ms (0.1%)

Algorithm

2×	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)

Iter	Nodes	Cost
0	413	6413
1	1273	6055
2	5799	6055
0	5	5

Stop Event

1×	saturated
1×	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)

simplify61.0ms (0.1%)

Algorithm

1×	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)

Iter	Nodes	Cost
0	60	583
1	162	557
2	675	557
3	5646	553

Stop Event

1×	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)))

eval55.0ms (0.1%)

Compiler: Compiled 895 to 542 computations (39.4% saved)

prune9.0ms (0%)

Pruning

4 alts after pruning (4 fresh and 0 done)

	Pruned	Kept	Total
New	2	3	5
Fresh	0	1	1
Picked	0	0	0
Done	0	0	0
Total	2	4	6

Accurracy

2.5%

Counts

6 → 3

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	1.6%	(/.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)))
▶	2.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))))))
▶	2.1%	(.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)))

Status

Accuracy

Program

▶

1.6%

(/.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)))

▶

2.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))))))

▶

2.1%

(*.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 547 to 357 computations (34.7% saved)

localize839.0ms (0.8%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	61.8%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	61.6%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	50.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.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)))

Compiler

Compiled 1612 to 927 computations (42.5% saved)

series518.0ms (0.5%)

Counts

4 → 144

Calls

36 calls:

Time	Variable		Point	Expression
70.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)))
35.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))))
34.0ms	angle	@	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)))
30.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 (cos.f64 (.f64 (/.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)))
29.0ms	a	@	inf	(/.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))))

rewrite155.0ms (0.1%)

Algorithm

1×	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)

Iter	Nodes	Cost
0	64	1122
1	1472	1122

Stop Event

1×	node limit

Counts

4 → 36

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))))
(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))

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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #f)))
(((.f64 1 (cos.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #f)))
(((.f64 1 (sin.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #f)) ((pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (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 1/180) (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>) ((.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)))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) #f)))

simplify1.5s (1.5%)

Algorithm

1×	egg-herbie

Rules

1834×	`associate-*r/`
1484×	`*-commutative`
1392×	`+-commutative`
826×	`associate-+r+`
686×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1624	286378
1	6395	286378

Stop Event

1×	node limit

Counts

180 → 392

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)))))))))
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 (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)))))))
(.f64 1 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(.f64 1 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))

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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (/.f64 (.f64 0 a) (/.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 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (/.f64 (.f64 0 a) (/.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 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.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 (.f64 0 a) (/.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)))))))) 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 (.f64 -2 (.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 (.f64 0 a) (/.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (.f64 (.f64 a a) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 8 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 4 (.f64 (/.f64 (.f64 (.f64 (.f64 a a) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))) (.f64 2 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) 2)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))))))) (.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (/.f64 (.f64 0 a) (/.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 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.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 (.f64 0 a) (/.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)))))))) 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 (.f64 -2 (.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 (.f64 0 a) (/.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 x-scale (.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (.f64 8 (/.f64 (/.f64 (.f64 0 a) (/.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 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 a a) (.f64 (/.f64 (.f64 0 a) (/.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) 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 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 -2 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (/.f64 (.f64 0 a) (/.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 (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)))) (pow.f64 (.f64 -2 (.f64 (/.f64 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)))))) (.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale (.f64 (.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(fma.f64 1/4 (.f64 y-scale (.f64 (.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 (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 (.f64 0 a) (/.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 (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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.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 (.f64 0 a) (/.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 (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 (.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.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 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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 -8 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale))) (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 -2 (.f64 (.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (.f64 (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))))) (sqrt.f64 8)))) (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 (.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 (.f64 0 a) (/.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 (.f64 0 a) (/.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))))))) 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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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))))))))) 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))))))))))))))) (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 (.f64 0 a) (/.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 (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 (.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.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 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 -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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 a) (/.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 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 a) (/.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 (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 (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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) b) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) 2))))))))) (.f64 2 (.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 b 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 a) (/.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 (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 (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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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)))))) (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 (.f64 8 (.f64 (.f64 a a) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 0 a) (/.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 y-scale x-scale)) (.f64 (/.f64 (.f64 -4 (/.f64 (.f64 0 a) (/.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 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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) 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 -2 (.f64 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (/.f64 (.f64 0 a) (/.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))))
(.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 (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 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))))))) (.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/2 (.f64 a (.f64 (.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 (.f64 0 (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 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 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 (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 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 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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)))))))) 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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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))))))))) (.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))))
(fma.f64 1/2 (.f64 a (.f64 (.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 (.f64 0 (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 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 (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 -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 (.f64 0 (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 (/.f64 (.f64 4 (/.f64 (.f64 0 (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))))) (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 0 (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 (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))))))))))))) 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 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 (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 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 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))))))) (fma.f64 1/8 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (pow.f64 a 3)) (.f64 (sqrt.f64 8) (+.f64 (.f64 (.f64 1/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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 -8 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 -4 (/.f64 (.f64 (.f64 (.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b)))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))) (.f64 y-scale x-scale))))) (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b)) (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (.f64 (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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))))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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)))))))) 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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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))))))))) (.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/2 (.f64 a (.f64 (.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 (.f64 0 (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 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 (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 (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 (/.f64 (.f64 0 (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 0 (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 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b 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 (.f64 0 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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)))))) 2))))) (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 (+.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 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 -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 (.f64 0 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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)))))) 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 (.f64 2 (/.f64 (.f64 0 (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))))) (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))))))))) 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)))))))))))) (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 (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 -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 (.f64 0 (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 (/.f64 (.f64 4 (/.f64 (.f64 0 (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))))) (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 0 (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 (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))))))))))))) 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 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 (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/4 (.f64 y-scale (.f64 (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 (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 y-scale (.f64 (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 y-scale (/.f64 a (.f64 x-scale (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 (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 (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)))))) y-scale) (/.f64 a (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 1/4 (.f64 y-scale (.f64 (.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 (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 2 (.f64 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (pow.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a)) (fma.f64 -1/2 (.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 y-scale (/.f64 a (.f64 x-scale (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (.f64 8 (.f64 (/.f64 (/.f64 (.f64 0 (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))) (.f64 4 (.f64 (/.f64 (/.f64 (.f64 0 (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 (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 (.f64 0 (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 (.f64 0 (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)))))) (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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)))))))))))))))) (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 (.f64 0 (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 (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)))))) y-scale) (/.f64 a (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 1/4 (.f64 y-scale (.f64 (.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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/4 (.f64 y-scale (.f64 (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 (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 y-scale (.f64 (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 y-scale (/.f64 a (.f64 x-scale (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (.f64 0 (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 (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)))))) y-scale) (/.f64 a (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 -1/4 (.f64 y-scale (.f64 (.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 (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 2 (.f64 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (pow.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a)) (fma.f64 -1/2 (.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 y-scale (/.f64 a (.f64 x-scale (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (.f64 8 (.f64 (/.f64 (/.f64 (.f64 0 (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))) (.f64 4 (.f64 (/.f64 (/.f64 (.f64 0 (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 (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 (.f64 0 (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 (.f64 0 (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)))))) (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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)))))))))))))))) (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 (.f64 0 (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 (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)))))) y-scale) (/.f64 a (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 -1/4 (.f64 y-scale (.f64 (.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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
(.f64 1/4 (.f64 y-scale (.f64 (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 (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 -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 y-scale (.f64 (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 (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 -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 (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 -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 (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 -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 y-scale (.f64 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (/.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (neg.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 y-scale (.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 (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 -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 (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 -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 (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 -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 (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 -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 (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 -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)))))))))) (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 (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 -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 (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 -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 (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 -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 y-scale (.f64 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) x-scale)))
(fma.f64 1/4 (.f64 (.f64 y-scale (.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 (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 (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 -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)))
(+.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale 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 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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (.f64 y-scale (.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 (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 (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 -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))))
(+.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (pow.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))) (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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (.f64 y-scale (.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 (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 (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 -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) (/.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)))))) y-scale) (/.f64 (pow.f64 x-scale 5) (.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 -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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (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 -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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) x-scale)))
(fma.f64 -1/4 (.f64 (.f64 y-scale (.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 (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 (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 -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)))
(+.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) 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 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) x-scale))))
(fma.f64 -1/4 (.f64 (.f64 y-scale (.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 (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 (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 -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) (.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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (pow.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (.f64 (.f64 y-scale (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))) 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 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale 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)))))) y-scale) (/.f64 (pow.f64 x-scale 5) (.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 -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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (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 -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))))))))))) (fma.f64 -1/4 (.f64 (.f64 y-scale (.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 (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 (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 -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) (.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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 b b))))))
(.f64 1/4 (.f64 x-scale (.f64 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)) (-.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 x-scale (.f64 (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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2)) (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (.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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))))) 2)) (/.f64 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/8 (.f64 x-scale (.f64 (.f64 (.f64 (pow.f64 y-scale 4) (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 b b))))))))))
(fma.f64 1/8 (.f64 x-scale (.f64 (.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))))) (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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 x-scale (.f64 (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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 angle (.f64 1/180 (PI.f64)))) 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 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/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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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 (.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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 (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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.f64)))) 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 (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 y-scale 3))))))
(fma.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/8 (+.f64 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (.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 angle (.f64 1/180 (PI.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 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 y-scale 3)))))))
(fma.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))))))) (fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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/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 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (.f64 x-scale (.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 5)))))))
(.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 angle (.f64 1/180 (PI.f64)))) 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 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/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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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 (.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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/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 angle (.f64 1/180 (PI.f64)))) 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 (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 y-scale 3))) (fma.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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/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 angle (.f64 1/180 (PI.f64)))) 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 (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))))))))) (fma.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (.f64 x-scale (.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 5))) (fma.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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)))))) 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 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 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/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 (.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 (.f64 1/8100 (.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))))
(fma.f64 1/4 (.f64 y-scale (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (/.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 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 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/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 (.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 (.f64 1/8100 (.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)) (.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 y-scale y-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 x-scale x-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 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 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 (.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 (.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 (.f64 1/8100 (.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)))) 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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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)) (/.f64 (.f64 (.f64 x-scale x-scale) (.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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (sqrt.f64 2))))))
(+.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 (/.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 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 (.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 (.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 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 (.f64 1/8100 (.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 (/.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 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 x-scale x-scale) (/.f64 (.f64 (.f64 b b) (pow.f64 (sqrt.f64 2) 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 (.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 (.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 (.f64 1/8100 (.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))) (+.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 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (.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 (.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 (.f64 1/8100 (.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 (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 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/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 (.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 (.f64 1/8100 (.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)) (.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 y-scale y-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 x-scale x-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 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 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 (.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 (.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 (.f64 1/8100 (.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)))) b))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.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 (/.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 (.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 (.f64 a a) (.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 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (.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 (.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 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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (.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 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 x-scale x-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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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/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 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 y-scale y-scale)))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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)) (/.f64 (.f64 (.f64 x-scale x-scale) (.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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (sqrt.f64 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 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (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 (.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 4 (/.f64 (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 (/.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 x-scale x-scale)) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 0 a) (/.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 (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 x-scale x-scale)) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 0 a) (/.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 (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.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 (.f64 0 a) (/.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)))))))) 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 (.f64 -2 (.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 (.f64 0 a) (/.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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/2 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (+.f64 (.f64 8 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 4 (.f64 (/.f64 (.f64 (.f64 (.f64 a a) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))) (.f64 2 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) y-scale) (/.f64 (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))))) 2)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.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 x-scale x-scale)) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale)))) 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)))) (pow.f64 (.f64 (.f64 -2 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (.f64 8 (/.f64 (/.f64 (.f64 0 a) (/.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 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 a a) (.f64 (/.f64 (.f64 0 a) (/.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))) 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 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 -2 (.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (/.f64 (.f64 0 a) (/.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 (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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)))) (pow.f64 (.f64 -2 (.f64 (/.f64 (/.f64 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (.f64 a a) (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 0 a) (/.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 (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.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 (.f64 0 a) (/.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)))))))) 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 (.f64 -2 (.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 (.f64 0 a) (/.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (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 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 b 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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 -1/2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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/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 (.f64 0 a) (/.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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)) (/.f64 (.f64 (.f64 y-scale x-scale) b) (sqrt.f64 8)))) (fma.f64 -1/4 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 -1/2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/180 (.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (/.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 0 a) (/.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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)) (/.f64 (.f64 (.f64 y-scale x-scale) b) (sqrt.f64 8)))) (fma.f64 -1/4 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 -8 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale))) (.f64 -4 (.f64 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 -2 (.f64 (.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale) (/.f64 (.f64 (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (/.f64 (.f64 -4 (.f64 (.f64 a a) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (pow.f64 (.f64 (.f64 4 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (.f64 2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))))) y-scale)) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 b b)) (sqrt.f64 8)))) (.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/180 (.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (/.f64 b 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 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 (.f64 0 a) (/.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 (.f64 0 a) (/.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))))))) 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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.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 (.f64 0 a) (/.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 -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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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))))))))) 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 (.f64 0 a) (/.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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 b 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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 1/2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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/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 (.f64 0 a) (/.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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 1/2 (.f64 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/180 (.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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (/.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 0 a) (/.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 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)))) y-scale))) (.f64 4 (.f64 (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) 2))))))))) (.f64 2 (.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 (.f64 y-scale x-scale) (.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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)))) (fma.f64 4 (pow.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) 2) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 -4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))) (/.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 (.f64 -2 (/.f64 (.f64 0 (.f64 (/.f64 a y-scale) (/.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 b b)) (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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (/.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 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 0 a) (/.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 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 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 (.f64 a a) (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (.f64 0 a) (/.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 y-scale x-scale)) (.f64 (/.f64 (.f64 -4 (/.f64 (.f64 0 a) (/.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 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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 y-scale x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) 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 -2 (.f64 (.f64 (/.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (/.f64 (.f64 0 a) (/.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 (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 -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))) (.f64 4 (pow.f64 (/.f64 (.f64 0 a) (/.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)))) (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 (.f64 0 a) (/.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 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 (.f64 0 a) (/.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 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 (.f64 y-scale x-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))) 2)))))))
(.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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/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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.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 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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 (.f64 -1/2 (/.f64 a (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 0 (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)))))))) (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 -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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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))))))) (/.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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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)))))))) 2)))))) (fma.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.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 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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 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 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 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 -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 (.f64 0 (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 (/.f64 (.f64 4 (/.f64 (.f64 0 (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))))) (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 0 (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 (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))))))))))))) 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 (.f64 -1/2 (/.f64 a (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 0 (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)))))))) (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 -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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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))))))) (/.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 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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)))))))) 2)))))) (fma.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (.f64 b b))))) (.f64 y-scale y-scale)))) (.f64 -1/8 (/.f64 (.f64 (.f64 (pow.f64 a 3) (.f64 (sqrt.f64 8) (+.f64 (.f64 (.f64 1/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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))) (+.f64 (.f64 -8 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (.f64 -4 (/.f64 (.f64 (.f64 (.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))) 2))) (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b)))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))) (.f64 y-scale x-scale))))) (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b)) (-.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 4 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (fma.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))) 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)))) (pow.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (sqrt.f64 (/.f64 1 (.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 (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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2))))))))) 2)))))) (sqrt.f64 (/.f64 1 (.f64 (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.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 (/.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 (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)) (.f64 y-scale y-scale)))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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)))))))) (.f64 y-scale x-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 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 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 -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 (.f64 0 (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 (/.f64 (.f64 4 (/.f64 (.f64 0 (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))))) (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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 0 (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 (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))))))))))))) 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))) (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 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 a (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (.f64 (/.f64 (.f64 0 (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 -1/8 (/.f64 (.f64 (.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 (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 (/.f64 (.f64 0 (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 0 (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 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b 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 (.f64 0 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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)))))) 2))))) (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 (+.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 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 -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 (.f64 0 (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 (.f64 0 (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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)))))) 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 (.f64 2 (/.f64 (.f64 0 (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))))) (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))))))))) 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 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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (*.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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.f64 y-scale y-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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)) 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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.f64 y-scale y-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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 2 (.f64 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (pow.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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) (.f64 a a)) (sqrt.f64 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)) 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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.f64 y-scale y-scale)))) (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 (.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 8 (.f64 (/.f64 (/.f64 (.f64 0 (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))) (.f64 4 (.f64 (/.f64 (/.f64 (.f64 0 (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 (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 (.f64 0 (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 (.f64 0 (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)))))) (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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))))))))))) 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a y-scale) (/.f64 (sqrt.f64 8) x-scale))) (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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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/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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.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 1/180 (.f64 angle (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-scale)))) (fma.f64 1/4 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale) (/.f64 (sqrt.f64 8) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)) 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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.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/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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (.f64 x-scale x-scale)) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 y-scale y-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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 8 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) x-scale) (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b b))) y-scale))) (.f64 4 (.f64 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) y-scale) (/.f64 (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (-.f64 (fma.f64 -4 (.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) x-scale)) (sqrt.f64 (/.f64 1 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 2 (.f64 (/.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (pow.f64 (.f64 -2 (.f64 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (sqrt.f64 (/.f64 1 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 x-scale) (.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale)))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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) (.f64 a a)) (sqrt.f64 8)))) (fma.f64 1/4 (.f64 (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 y-scale) (/.f64 (sqrt.f64 8) 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.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 b b)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale)))) (fma.f64 -4 (.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 b b)) (.f64 y-scale y-scale))) (.f64 4 (pow.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) 2))))) (pow.f64 (.f64 (.f64 -4 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (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 -2 (/.f64 (.f64 0 (/.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b)) (.f64 y-scale x-scale))) (/.f64 (.f64 y-scale x-scale) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (sqrt.f64 (/.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)) 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 (/.f64 (.f64 0 (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 x-scale 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)))))) (.f64 y-scale 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 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 (.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 8 (.f64 (/.f64 (/.f64 (.f64 0 (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))) (.f64 4 (.f64 (/.f64 (/.f64 (.f64 0 (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 (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 (.f64 0 (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 (.f64 0 (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)))))) (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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))))))))))) x-scale) (/.f64 (sqrt.f64 8) (.f64 y-scale (.f64 a 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))) (.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 (.f64 0 (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 (.f64 0 (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 (.f64 0 (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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 b b))))))
(.f64 (/.f64 (.f64 -1/4 (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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (.f64 (.f64 -1/8 (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))))))) (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 (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 -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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) 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 (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 -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 (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 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 (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 -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 (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 -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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (pow.f64 x-scale 4) (/.f64 y-scale (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (/.f64 (.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) 2)) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (/.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (neg.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (sqrt.f64 8) (/.f64 y-scale (+.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))) 2)) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) 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 (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 -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 (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 -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 (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 -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 (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 -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 (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 -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 (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 -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 (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 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 (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 -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 (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 -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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))
(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (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 -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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))) 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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (pow.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))) 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 (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 -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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (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 -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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))
(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale 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 (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 (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 -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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))) 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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (/.f64 (pow.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) 3) (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))))) (.f64 (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.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 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 (.f64 1/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2)))))) (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b) (.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (*.f64 y-scale y-scale))))))) 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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (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 -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 (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 -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 (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 -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 (.f64 1/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 1/180 (.f64 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 (.f64 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 (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 -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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (+.f64 (/.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/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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/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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (+.f64 (/.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/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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)))) (fma.f64 -1/4 (.f64 (sqrt.f64 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) (/.f64 (sqrt.f64 8) (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 b b))))))) 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (.f64 (.f64 (.f64 (pow.f64 y-scale 4) (+.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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2)) (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))) 2)) (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (.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 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))))) 2)) (/.f64 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) x-scale) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))) (/.f64 (+.f64 (/.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/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.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)))) (fma.f64 -1/4 (.f64 (sqrt.f64 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) (/.f64 (sqrt.f64 8) (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 (.f64 y-scale y-scale) (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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))) 2))) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))) (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))) (sqrt.f64 (/.f64 1 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 b b))))))) x-scale)))))
(fma.f64 -1/8 (/.f64 (.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)))))) (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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 x-scale))) (.f64 (.f64 -1/8 (/.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))
(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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 3)) (sqrt.f64 8))))))
(+.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 angle (.f64 1/180 (PI.f64)))) 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 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 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 x-scale))) (.f64 (.f64 -1/8 (/.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))))))
(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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 3)) (sqrt.f64 8)))))))
(+.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 angle (.f64 1/180 (PI.f64)))) 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 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))))) (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 angle (.f64 1/180 (PI.f64)))) 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 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 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 x-scale))) (.f64 (.f64 -1/8 (/.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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))))
(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))))))) (+.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 3)) (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 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 (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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 3)) (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 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 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 (.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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 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 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))) (/.f64 (.f64 x-scale (pow.f64 y-scale 3)) (sqrt.f64 8)))) (.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 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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))))) (fma.f64 4 (/.f64 (pow.f64 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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)))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 (-.f64 b a) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)))))))) (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 angle (.f64 1/180 (PI.f64)))) 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 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.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 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))) (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 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 3)) (sqrt.f64 8)))) (.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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (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 (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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 (pow.f64 (-.f64 b a) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 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 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/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 (.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 (.f64 1/8100 (.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 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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 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 y-scale y-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 x-scale x-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 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 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 (.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 (.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 (.f64 1/8100 (.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))) (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/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 (.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 (.f64 1/8100 (.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 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 (pow.f64 angle 4) (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale b)) (.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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (/.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 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 y-scale y-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 x-scale x-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 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 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 (.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 (.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 (.f64 1/8100 (.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))) (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/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 (.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 (.f64 1/8100 (.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 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 (/.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 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 (.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 (.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 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (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 (.f64 1/8100 (.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 (/.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 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 x-scale x-scale) (/.f64 (.f64 (.f64 b b) (pow.f64 (sqrt.f64 2) 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 (.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 (.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 (.f64 1/8100 (.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))) (+.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 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.f64 1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))) (.f64 y-scale y-scale)))) 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 (.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 (.f64 1/8100 (.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 (.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 (.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 (.f64 1/8100 (.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 (pow.f64 angle 4) (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale b)) (.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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (/.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 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 (+.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 (/.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 (.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 (.f64 a a) (.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 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))))) (.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 (.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 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 (.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/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (.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 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 x-scale x-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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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/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 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 y-scale y-scale)))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale x-scale))) (fma.f64 1/45 (.f64 (/.f64 (pow.f64 (-.f64 b a) 2) (.f64 y-scale y-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 x-scale 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 (.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 (.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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (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)))))) (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))))) (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 1/8100 (/.f64 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 b a) 2) (pow.f64 (+.f64 a b) 2)) (pow.f64 (PI.f64) 2)) (.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 (/.f64 (.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 y-scale y-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale)))) 2) (.f64 4 (/.f64 (pow.f64 (-.f64 b 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) (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 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 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 (.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 4 (/.f64 (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 (/.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))))
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)))
(+.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 (.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)))))
(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 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 (PI.f64) 3) (pow.f64 angle 3)) (.f64 angle (*.f64 1/180 (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)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 (PI.f64) 3) (pow.f64 angle 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (.f64 1/22674816000000 (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))))))
(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 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))))
(/.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 a (.f64 (.f64 b b) (.f64 a -4))))) (.f64 (/.f64 (sqrt.f64 (.f64 (.f64 b (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 (.f64 a 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 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 (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 (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 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))))))))))
(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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (/.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 a (.f64 (.f64 b b) (.f64 a -4)))) (.f64 (/.f64 (sqrt.f64 (.f64 (.f64 b (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.f64 a (.f64 (.f64 b b) (.f64 a -4)))) (/.f64 (sqrt.f64 (.f64 (.f64 b (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 (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 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))))))))
(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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (/.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (/.f64 y-scale (.f64 (.f64 2 (+.f64 a b)) (-.f64 b a)))) x-scale) (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))) (.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 1 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (exp.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 1 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sqrt.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 1)
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log.f64 (exp.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))

localize619.0ms (0.6%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	61.8%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	61.6%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	51.1%	(/.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.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))))))

Compiler

Compiled 1550 to 866 computations (44.1% saved)

series387.0ms (0.4%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
58.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))))
28.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))))))
28.0ms	x-scale	@	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))))))
25.0ms	b	@	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))))))
19.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))))))

rewrite105.0ms (0.1%)

Algorithm

1×	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)

Iter	Nodes	Cost
0	61	1090
1	1403	1090

Stop Event

1×	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))))

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)))

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.5%)

Algorithm

1×	egg-herbie

Rules

1430×	`associate-*r/`
1226×	`+-commutative`
1174×	`*-commutative`
1026×	`associate-*l/`
728×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1332	299512
1	4985	299458

Stop Event

1×	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))))

localize607.0ms (0.6%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	79.6%	(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)))
	61.8%	(sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
	61.6%	(cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))
✓	27.7%	(/.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)))

Compiler

Compiled 1618 to 1051 computations (35% saved)

series206.0ms (0.2%)

Counts

2 → 120

Calls

30 calls:

Time	Variable		Point	Expression
35.0ms	a	@	-inf	(/.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)))
26.0ms	b	@	0	(/.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)))
16.0ms	a	@	inf	(/.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)))
12.0ms	angle	@	0	(/.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)))
12.0ms	a	@	0	(/.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)))

rewrite434.0ms (0.4%)

Algorithm

1×	batch-egg-rewrite

Rules

1402×	`add-sqr-sqrt`
1382×	`*-un-lft-identity`
1292×	`add-exp-log`
1290×	`add-cbrt-cube`
1290×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	60	852
1	1381	852

Stop Event

1×	node limit

Counts

2 → 22

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)))

(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)))

Outputs

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

(((*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((*.f64 (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2)))) (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((*.f64 (*.f64 (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2)))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2))))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((pow.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-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>) ((/.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))) (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)))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((cbrt.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.f64 x-scale y-scale)) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 (sin.f64 (*.f64 (*.f64 angle 1/180) (PI.f64))) (*.f64 2 (-.f64 (*.f64 b b) (*.f64 a a))))) (*.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 (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))) (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)))) #f)))

simplify1.1s (1.1%)

Algorithm

1×	egg-herbie

Rules

1236×	`+-commutative`
1206×	`associate-/r*`
1126×	`*-commutative`
1058×	`associate-*r/`
834×	`associate-*l/`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1297	225394
1	4829	225070

Stop Event

1×	node limit

Counts

142 → 309

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/8 (.f64 (.f64 x-scale (.f64 y-scale (.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 (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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.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 (/.f64 (.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 (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 (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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (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)))))))))))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.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 (/.f64 (.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 (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 (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 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/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 (.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 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/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 (.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 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 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 y-scale (.f64 x-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 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 (.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 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 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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/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 (.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 (+.f64 (/.f64 (.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 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 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 (+.f64 (/.f64 (.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 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-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/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 (.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 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.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 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.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 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 (+.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 8))))) (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)))))))))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 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 (+.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 8))))) (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)))))))) (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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))))))))))
(+.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 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 (+.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 8))))) (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)))))))) (+.f64 (.f64 1/8 (.f64 (.f64 x-scale (.f64 y-scale (.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 (+.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)) (+.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))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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 1/2 (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (+.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))))))))))) (+.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))))))) (sqrt.f64 8))))) (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)))))))) (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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)))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 a (sqrt.f64 8)))) (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 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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 a (sqrt.f64 8)))) (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 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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (+.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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)) (sqrt.f64 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -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 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.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 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 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 -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 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 (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 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (+.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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)) (sqrt.f64 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (/.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/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 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 -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 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)))) (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 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 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 -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 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)))) (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 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.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 -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 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)))) (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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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 (/.f64 (.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)) (.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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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))))))) (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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (+.f64 (/.f64 (.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 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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 (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) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/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))))))) (-.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 (+.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)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (+.f64 (/.f64 (.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 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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)))))))) (.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 (pow.f64 y-scale 4) (.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)) (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 2) (.f64 (sqrt.f64 8) (+.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)))))))) (.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 (pow.f64 y-scale 4) (.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)) (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 2) (.f64 (sqrt.f64 8) (+.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)))))))) (+.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 -1/4 (/.f64 (.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 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 -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 (.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))) (+.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 (pow.f64 y-scale 6) (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 (sqrt.f64 2) (.f64 y-scale (.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/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/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.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/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 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 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 (.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 (+.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 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.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/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 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 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 (.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 (+.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 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 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 (.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 (.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 (+.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 (.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 (+.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))))) (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 (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 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 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 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 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 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 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 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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)))))))))
(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 1/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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))))))))) (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 1/2 (.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))))) (+.f64 (.f64 1/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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))))))))) (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 1/2 (.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))))) (+.f64 (.f64 1/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (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 -1/4 (.f64 (/.f64 (.f64 (pow.f64 a 6) (.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 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(+.f64 (.f64 1/2 (.f64 (/.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))
(+.f64 (.f64 1/2 (.f64 (/.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (+.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(+.f64 (.f64 1/2 (.f64 (/.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))
(+.f64 (.f64 1/2 (.f64 (/.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (+.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 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 (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 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.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 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.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 (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 (pow.f64 angle 6) (-.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 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.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 (pow.f64 b 2) (pow.f64 x-scale 2))))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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 (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 -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 b 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 (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 -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 b 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4)))) (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 (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 -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 b 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4)))) (+.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 y-scale 2) (pow.f64 x-scale 2)))))) (.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 (pow.f64 b 6) (+.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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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))) (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 2)))))
(/.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))) (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 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))))) (/.f64 (.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 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))))) (+.f64 (/.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 (pow.f64 x-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 (.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))))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 4) (.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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))))) (+.f64 (/.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 (pow.f64 x-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 (.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)))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.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 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.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))))) (.f64 (pow.f64 x-scale 6) (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.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 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.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))))) (.f64 (pow.f64 x-scale 6) (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 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 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 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 -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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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) (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))))) (+.f64 (/.f64 (.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 -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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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) (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))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 (/.f64 (.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 -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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (+.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 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (+.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 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))))
(.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))))) (/.f64 1 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (*.f64 b (neg.f64 a)))))))
(.f64 1 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (sqrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))) (sqrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (.f64 (cbrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))) (cbrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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)))) (cbrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))
(pow.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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)) 1)
(neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))))))) (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))))
(log.f64 (exp.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))))
(cbrt.f64 (.f64 (.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))))
(exp.f64 (log.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 1 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2))))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))) (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2)))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(pow.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)) 1/2)
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))) 1)
(log.f64 (exp.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(cbrt.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(exp.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))

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 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 (.f64 1/8 (.f64 (.f64 x-scale (.f64 y-scale (.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 (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/8 (.f64 x-scale (.f64 (.f64 y-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 (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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)))))))))))
(fma.f64 1/8 (.f64 x-scale (.f64 (.f64 y-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 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.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 (/.f64 (.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 (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 (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/8 (.f64 x-scale (.f64 (.f64 (.f64 y-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 (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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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)))))))))) (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-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 (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))) (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)))))))))))) (fma.f64 1/8 (.f64 x-scale (.f64 (.f64 y-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 (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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))))))))))))
(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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-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 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))) (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 (pow.f64 a 4) (.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 1/8 (.f64 x-scale (.f64 (.f64 y-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 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (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)))))))))))) 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.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 (/.f64 (.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 (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 (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/8 (.f64 x-scale (.f64 (.f64 y-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 (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (/.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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 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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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)))))))))) (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) 2)))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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)))))))))))) (fma.f64 1/8 (.f64 x-scale (.f64 (.f64 (.f64 y-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 (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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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)))))))))) (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-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 (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))) (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)))))))))))) (fma.f64 1/8 (.f64 x-scale (.f64 (.f64 y-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 (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))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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)))))))))))))
(fma.f64 1/8 (.f64 x-scale (.f64 (.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 (pow.f64 a 4) (.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 (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 (.f64 a a) (pow.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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 -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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-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))) (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 (pow.f64 a 4) (.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 (.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 (pow.f64 a 4) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))) 2))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 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 4 (.f64 (/.f64 (pow.f64 a 4) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-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 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))) (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 (pow.f64 a 4) (.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 1/8 (.f64 x-scale (.f64 (.f64 y-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 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.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))) (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 (pow.f64 a 4) (.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 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.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 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/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 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.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 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 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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/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 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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/8 (/.f64 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 y-scale (.f64 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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/8 y-scale) (/.f64 (/.f64 (pow.f64 b 3) x-scale) (.f64 (sqrt.f64 8) (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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 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 (.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 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 (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 b 5) (.f64 (.f64 x-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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))))) (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 -1/2 (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.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/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 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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/8 (/.f64 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))))) (/.f64 (.f64 -1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (/.f64 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 y-scale (.f64 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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/8 y-scale) (/.f64 (/.f64 (pow.f64 b 3) x-scale) (.f64 (sqrt.f64 8) (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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 x-scale (.f64 (sqrt.f64 8) b)))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.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 y-scale (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 y-scale x-scale) (.f64 (sqrt.f64 8) (+.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 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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) -1/8))
(fma.f64 -1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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 (+.f64 (/.f64 (.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/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))) (fma.f64 -1/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 y-scale x-scale) (.f64 (sqrt.f64 8) (+.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 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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 y-scale y-scale))) 2))))))) -1/8)))
(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 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (pow.f64 b 3) x-scale) (.f64 (sqrt.f64 8) (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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))) (fma.f64 -1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (/.f64 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-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/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 (.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/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2))))))) (fma.f64 -1/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 b 5) (.f64 (.f64 x-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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))))) (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 -1/2 (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))))) (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) 2)) (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 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 (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))))))))) (.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 (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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (pow.f64 b 3) x-scale) (.f64 (sqrt.f64 8) (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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))))) (fma.f64 -1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b (.f64 x-scale (.f64 (sqrt.f64 8) (+.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (pow.f64 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))))) (/.f64 (.f64 -1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (neg.f64 (pow.f64 (.f64 1/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))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (/.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 1 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.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 (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))))))) (+.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 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (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 (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))))))) (+.f64 (/.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/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.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 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 (+.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 8))))) (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)))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (+.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 (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))))))) (+.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/8 (.f64 (.f64 y-scale x-scale) (.f64 (.f64 (.f64 a a) (+.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 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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))))))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (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 (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))))))) (+.f64 (/.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (pow.f64 b 4) (.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 (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 (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 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 (+.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 8))))) (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)))))))) (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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))))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (+.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 (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))))))) (+.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 1/8 (+.f64 (.f64 (.f64 (.f64 y-scale x-scale) (.f64 (.f64 (.f64 a a) (+.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 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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))))))) (sqrt.f64 8))) (sqrt.f64 (/.f64 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 y-scale x-scale) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (-.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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)) (pow.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 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)))))))) (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)))) (.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))))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (+.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) (.f64 x-scale x-scale)) (.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 (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)))))))) (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)))) (.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))))))))))) (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 (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))))))) (+.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 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (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 (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))))))) (+.f64 (/.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (pow.f64 b 4) (.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 (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 x-scale (.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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)))))))) (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 (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)))))))) (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 (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 (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))))))) (+.f64 (/.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))))))))) 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 (pow.f64 b 4) (.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 (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 (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 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 (+.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 8))))) (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)))))))) (+.f64 (.f64 1/8 (.f64 (.f64 x-scale (.f64 y-scale (.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 (+.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)) (+.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))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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 1/2 (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (+.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))))))))))) (+.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))))))) (sqrt.f64 8))))) (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)))))))) (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)))))) (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)))))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8)) (sqrt.f64 (+.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 (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))))))) (+.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 (.f64 (.f64 y-scale x-scale) (.f64 (.f64 (.f64 a a) (+.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 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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))))))) (sqrt.f64 8))) (sqrt.f64 (/.f64 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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/8 (+.f64 (.f64 x-scale (.f64 (.f64 (.f64 y-scale (pow.f64 a 6)) (.f64 (sqrt.f64 8) (+.f64 (.f64 (.f64 -1/4 (/.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 (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)) (pow.f64 (.f64 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (-.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 (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)))))) (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)))) (.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)))))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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/2 (/.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 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)))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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)) (pow.f64 (.f64 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 1/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))) (.f64 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))))) (sqrt.f64 (/.f64 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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 (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))))))) (+.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 (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) (.f64 x-scale x-scale)) (.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 (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)))))))) (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)))) (.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))))))))))))))))) (sqrt.f64 (/.f64 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 1 (+.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 y-scale x-scale) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (-.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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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)) (pow.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 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)))))))) (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)))) (.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))))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (+.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) (.f64 x-scale x-scale)) (.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 (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)))))))) (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)))) (.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))))))))))) (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 (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))))))) (+.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 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (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 (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))))))) (+.f64 (/.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))))))) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (pow.f64 b 4) (.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 (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 (pow.f64 a 4) (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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)))))))) (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 (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)))))))) (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 (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 (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))))))) (+.f64 (/.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))))))))) 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 (pow.f64 b 4) (.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 (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 x-scale (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 b 4) (.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 (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)) (/.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 (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)))))) (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 (+.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 (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)))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 b 4) (.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 (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 (pow.f64 b 4) (.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 (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 (pow.f64 b 4) (.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 (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)) (/.f64 (+.f64 (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 (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))))))) (+.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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)))))))) (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 (pow.f64 b 4) (.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 (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/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 a (sqrt.f64 8)))) (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 1/4 (.f64 y-scale (.f64 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.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) (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (.f64 a (sqrt.f64 8)))) (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))))))))
(fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (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 (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 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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))))) (.f64 (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.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) (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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 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 (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (+.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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)) (sqrt.f64 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (/.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 (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 (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 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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 (sqrt.f64 (/.f64 1 (+.f64 (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 (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 (.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 (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 (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 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 1/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)))) (.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))))))) (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 (.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 (/.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)))) (pow.f64 a 3))) (.f64 (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.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) (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))))) (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 (/.f64 (pow.f64 a 3) 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 (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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 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 (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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -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 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.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 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 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 -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 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 (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 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 8)))) a) (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)))))))) (+.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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)) (sqrt.f64 8)))) (pow.f64 a 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (/.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 (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 (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 (.f64 (.f64 y-scale 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 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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 (.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)))) (.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))))))))))) (.f64 -1/2 (/.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (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 (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)))))) (fma.f64 1/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)))) (.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))))))) (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 (.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)) (/.f64 (+.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 1/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)))) (.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))))))) (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 (.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 a 5))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (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 (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 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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 (sqrt.f64 (/.f64 1 (+.f64 (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 (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 (.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 (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 (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 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 1/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)))) (.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))))))) (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 (.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 (/.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)))) (pow.f64 a 3))) (.f64 (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.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) (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.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 (/.f64 (pow.f64 a 5) 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))))))))) (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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))))) (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 (/.f64 (pow.f64 a 3) 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 (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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 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 (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 (.f64 x-scale a) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (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 (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/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 (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 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 -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 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)))) (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 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (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 (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 (.f64 -1/8 (/.f64 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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))))) (sqrt.f64 (/.f64 1 (+.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) (.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 (pow.f64 (cos.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 1/2 (.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 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 -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 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)))) (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 (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (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 (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)))))) (fma.f64 1/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)))) (.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))))))) (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 (.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 (/.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) (pow.f64 a 3)) (fma.f64 -1/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (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 (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 (.f64 -1/8 (/.f64 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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))))) (sqrt.f64 (/.f64 1 (+.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) (.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 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.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 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 2))))))) (fma.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (.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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (.f64 1/2 (.f64 (-.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)) (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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)) (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))))))))) (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 (.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 (cos.f64 (.f64 1/180 (.f64 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.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 -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 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)))) (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/8 (.f64 (/.f64 (.f64 y-scale (.f64 x-scale (.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.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 -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 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)))) (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 (/.f64 (.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)) (.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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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))))))) (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)))))))))))
(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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (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 (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)))))) (fma.f64 1/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)))) (.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))))))) (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 (.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 (/.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) (pow.f64 a 3)) (fma.f64 -1/4 (.f64 y-scale (.f64 (.f64 (.f64 x-scale a) (sqrt.f64 8)) (sqrt.f64 (+.f64 (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 (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/8 (+.f64 (.f64 (sqrt.f64 (/.f64 1 (+.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 a (.f64 (.f64 x-scale (fma.f64 1/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)))) (.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))))))) (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 (.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))))) (.f64 (sqrt.f64 (/.f64 1 (+.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2))))))) (/.f64 y-scale (/.f64 (pow.f64 a 5) (.f64 (.f64 x-scale (fma.f64 -1/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 (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)))) (.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))))))) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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 (-.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 (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 1/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)))) (.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))))))) (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)))))) (neg.f64 (.f64 1/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 (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 (-.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 (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 1/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)))) (.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))))))) (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)))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 1/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)))) (.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))))))) (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 (.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 (/.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) (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)))))))) 2)) (/.f64 (+.f64 (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 (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)))) (fma.f64 1/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)))) (.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))))))) (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 (.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 (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 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 2))))))) (fma.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 (pow.f64 (cos.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 y-scale y-scale)) (+.f64 (/.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 (/.f64 a x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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 (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 (/.f64 (pow.f64 a 5) 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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 -1/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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))))) (pow.f64 (.f64 1/2 (.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))))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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))))))) 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 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/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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 1/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 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 (.f64 (pow.f64 a 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (.f64 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 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 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/8 (.f64 y-scale (.f64 (.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (.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))))))) (sqrt.f64 (/.f64 1/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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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 1/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 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 (.f64 (pow.f64 a 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (+.f64 (/.f64 (.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 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (.f64 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/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 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/8 (.f64 y-scale (.f64 (.f64 (pow.f64 x-scale 4) (.f64 (sqrt.f64 8) (-.f64 (/.f64 (.f64 1/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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (+.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (/.f64 1 (.f64 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/8 (.f64 y-scale (.f64 (.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (.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))))))) (sqrt.f64 (/.f64 1/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))))))) (fma.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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 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 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 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (sqrt.f64 (/.f64 1/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 (.f64 y-scale y-scale) (pow.f64 (cos.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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)))) (sqrt.f64 (/.f64 1/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 1/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 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 (.f64 (pow.f64 a 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)))) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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 (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) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/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))))))) (-.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 (+.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)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2))) (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (+.f64 (/.f64 (.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 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (.f64 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/8 (.f64 (sqrt.f64 (/.f64 1 (.f64 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 y-scale (pow.f64 x-scale 6)) (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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)) (-.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 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 1/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))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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))))))) (-.f64 (/.f64 (.f64 1/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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (.f64 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 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/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 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/8 (.f64 y-scale (.f64 (.f64 (pow.f64 x-scale 4) (.f64 (sqrt.f64 8) (-.f64 (/.f64 (.f64 1/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)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (+.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (/.f64 1 (.f64 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/8 (.f64 y-scale (.f64 (.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (.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))))))) (sqrt.f64 (/.f64 1/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))))))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1/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 y-scale (.f64 (pow.f64 x-scale 6) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/4 (/.f64 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.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) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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))))) (/.f64 (.f64 -1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 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 1/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 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 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (fma.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (.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))))) (sqrt.f64 (/.f64 1/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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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 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 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 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (sqrt.f64 (/.f64 1/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 (.f64 y-scale y-scale) (pow.f64 (cos.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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)))) (sqrt.f64 (/.f64 1/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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) x-scale) (.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))))))))
(fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) 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 (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 (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 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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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))))) (neg.f64 (pow.f64 (.f64 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 b b) (/.f64 (.f64 y-scale y-scale) (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))))))))))
(fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (/.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)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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 (.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) 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 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 (PI.f64) (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (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) (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale)))))) (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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 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 (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 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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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))))) (neg.f64 (pow.f64 (.f64 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 b b) (/.f64 (.f64 y-scale y-scale) (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)))))))))))
(fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 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/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 (/.f64 (pow.f64 x-scale 5) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 -1/4 (-.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (-.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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)))))))))))))) (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (/.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)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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 -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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) x-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))))))))))
(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) 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 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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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))))) (neg.f64 (pow.f64 (.f64 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 -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)))))))))))
(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 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 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (/.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)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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 -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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 (.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 (.f64 y-scale (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 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)))))))) 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 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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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))))) (neg.f64 (pow.f64 (.f64 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 b b) (/.f64 (.f64 y-scale y-scale) (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))))))) (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 (.f64 -1/8 (/.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 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (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) (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale)))))) (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (.f64 1/2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (fma.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))))))) (/.f64 (pow.f64 x-scale 5) (.f64 y-scale (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/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 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 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (/.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)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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))))) (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (+.f64 (/.f64 (.f64 -1/4 (-.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (-.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) 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 b b) (/.f64 (.f64 y-scale y-scale) (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) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 (.f64 y-scale y-scale) (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 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))))))))))) (/.f64 (/.f64 (pow.f64 x-scale 5) 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 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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.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)))))))) (.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))))))))
(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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) (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 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)))))))
(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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/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 (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 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.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)) (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 2) (.f64 (sqrt.f64 8) (+.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)))))))) (.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)))))))))
(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 4)) (.f64 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (.f64 1/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 (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 (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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (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 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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) (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 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))))))))
(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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (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 (sqrt.f64 (/.f64 1/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))) (+.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))))) 2)))) (sqrt.f64 (/.f64 1/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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/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 (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 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.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)) (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 2) (.f64 (sqrt.f64 8) (+.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)))))))) (+.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 -1/4 (/.f64 (.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 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 -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 (.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))) (+.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 (pow.f64 y-scale 6) (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 4)) (.f64 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (.f64 1/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 (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 (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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (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 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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) (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 (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/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 (-.f64 (.f64 -1/4 (.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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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))) (+.f64 (/.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 (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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 1/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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) (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 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) (pow.f64 y-scale 6))))))))
(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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (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 (sqrt.f64 (/.f64 1/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))) (+.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))))) 2)))) (sqrt.f64 (/.f64 1/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/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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/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 1/8 (.f64 x-scale (.f64 (.f64 (+.f64 (/.f64 (.f64 -1/4 (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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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)) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 -1/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 (/.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/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 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) (pow.f64 y-scale 6))) (sqrt.f64 (/.f64 1/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 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 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 (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 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (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 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 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 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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)))))) 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 (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 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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))))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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/8 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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)))))) 2))))) (fma.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/8 (.f64 (sqrt.f64 (/.f64 1/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 y-scale 5) (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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 (.f64 -1/2 (.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 (.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 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/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 (PI.f64) (.f64 1/180 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 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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/8 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 2)))))) (.f64 (/.f64 x-scale (/.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.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/8 (+.f64 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (/.f64 1/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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)))))) 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 (PI.f64) (.f64 1/180 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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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))))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 2)))))) (.f64 (/.f64 x-scale (/.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (pow.f64 y-scale 5) (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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 (.f64 -1/2 (.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 (.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.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/8 (+.f64 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (/.f64 1/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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)))))) 2)))))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale b) (sqrt.f64 8)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale 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/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/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 x-scale x-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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 1/4 (sqrt.f64 2)) (.f64 (*.f64 y-scale b) (sqrt.f64 8))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 x-scale x-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 (.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 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 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale 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/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 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 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 (.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 (+.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 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 x-scale x-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (pow.f64 angle 4) (-.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 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (fma.f64 b b (neg.f64 (.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 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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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)))) (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))) (/.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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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))) (sqrt.f64 8))) (.f64 b (sqrt.f64 2))) (.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (*.f64 y-scale b) (sqrt.f64 8)))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 x-scale x-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 (.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 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)))))))))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (.f64 x-scale x-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 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)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 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 (.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 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)))) (+.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 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 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale 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/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 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 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 (.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 (+.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 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 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 (.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 (.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 (+.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 (.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 (+.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))))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 x-scale x-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (pow.f64 angle 4) (-.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 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (fma.f64 b b (neg.f64 (.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 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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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)))) (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))) (/.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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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))) (sqrt.f64 8))) (.f64 b (sqrt.f64 2))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (sqrt.f64 8))) (.f64 1/8 (/.f64 y-scale (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 angle 6)) (.f64 (sqrt.f64 8) (+.f64 (+.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 (.f64 a a) (/.f64 (.f64 y-scale y-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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000)) (/.f64 (.f64 y-scale x-scale) (.f64 (PI.f64) (fma.f64 b b (neg.f64 (.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))))) (+.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 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)) (.f64 2/45 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 -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 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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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))))) (+.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 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)) (.f64 2/45 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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)))) (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))) (/.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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 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/8 (/.f64 y-scale (/.f64 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 x-scale x-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 (.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 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)))))))))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (.f64 x-scale x-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 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)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 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 (.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 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)))) (+.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 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 (sqrt.f64 2) (.f64 (.f64 y-scale b) (sqrt.f64 8))) (.f64 1/8 (/.f64 y-scale (/.f64 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (.f64 x-scale x-scale) (pow.f64 angle 6))) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 a a) (/.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 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 (/.f64 (.f64 x-scale x-scale) (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 (.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)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (/.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 (/.f64 (.f64 y-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (PI.f64))))))) (/.f64 (.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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)))) y-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 (.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 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)) 1/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 (.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 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/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 (.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 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 (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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)))) y-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 (.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 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)))) (+.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 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 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 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 (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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 (/.f64 (.f64 a 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 (/.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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (.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 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 (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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 (/.f64 (.f64 a 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 (/.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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (.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 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 (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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 (/.f64 (.f64 a 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 (/.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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (.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 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 (/.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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 (/.f64 (.f64 a 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 (/.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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (.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))) (/.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 a 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)))) (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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (+.f64 (/.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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 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 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 (.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))) (/.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 a 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)))) (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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (+.f64 (/.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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 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 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 (.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))) (/.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 a 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)))) (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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (+.f64 (/.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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 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 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 (.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))) (/.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 a 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)))) (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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (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))) (+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (+.f64 (/.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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 2)) (*.f64 y-scale y-scale))))))))))))
(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)))
(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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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))))))))) (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))))
(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 (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)))))))) (.f64 (.f64 a a) (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)))) (.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))))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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 (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)))))))) (.f64 (.f64 a a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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/2 (.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))))) (+.f64 (.f64 1/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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))))))))) (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)))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (.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 (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)))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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)) (pow.f64 (.f64 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (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 (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)))))))) (.f64 (.f64 a a) (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)))) (.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))))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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 (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)))))))) (.f64 (pow.f64 a 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 b 4) (.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 (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)))) (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 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 b 4)))))))) (.f64 (.f64 a a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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/2 (.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))))))) (+.f64 (.f64 1/2 (.f64 (.f64 (pow.f64 a 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (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 -1/4 (.f64 (/.f64 (.f64 (pow.f64 a 6) (.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))))))))))))
(fma.f64 1/2 (.f64 (pow.f64 a 4) (.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 (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)))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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)) (pow.f64 (.f64 (.f64 1/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 (.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 (.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)))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (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 (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)))))))) (.f64 (.f64 a a) (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)))) (.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))))))))) (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 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 (.f64 (.f64 (pow.f64 a 6) (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)))) (.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)))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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)) (pow.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 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)))))))) (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)))) (.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))))))))) 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 (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))))))))) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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 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 (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)))))))) (.f64 (pow.f64 a 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 b 4) (.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 (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)))) (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 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 b 4)))))))) (.f64 (.f64 a a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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/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 (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)))))))) (/.f64 (.f64 (.f64 (pow.f64 a 6) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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)))))))) (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))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(.f64 (.f64 a a) (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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(fma.f64 1/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)))) (.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))))))) (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 a a) (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))
(fma.f64 1/2 (/.f64 (.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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 a a)) (fma.f64 1/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)))) (.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))))))) (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 a a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (+.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(fma.f64 1/2 (/.f64 (.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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 a a)) (fma.f64 1/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)))) (.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))))))) (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))))) (fma.f64 -1/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 (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 (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)))) (.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 a 4)) (/.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 (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 1/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)))) (.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))))))) (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))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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 a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 (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))))))) (pow.f64 a 4)) (/.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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(.f64 (.f64 a a) (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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(fma.f64 1/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)))) (.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))))))) (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 a a) (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))
(fma.f64 1/2 (/.f64 (.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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 a a)) (fma.f64 1/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)))) (.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))))))) (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 a a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 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 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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 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 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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) (+.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 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 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 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 -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 y-scale 2) (pow.f64 x-scale 2)))))))) 2))) (.f64 (pow.f64 a 4) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(fma.f64 1/2 (/.f64 (.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 (pow.f64 b 4) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)) (pow.f64 (.f64 1/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)))) (.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))))))) (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 a a)) (fma.f64 1/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)))) (.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))))))) (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))))) (fma.f64 -1/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 (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 (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)))) (.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 a 4)) (/.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 (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 1/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)))) (.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))))))) (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))) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.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 a) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.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 (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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a a))) (fma.f64 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (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 (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))))))) (pow.f64 a 4)) (/.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 (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 1/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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 a) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 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 1/2 (/.f64 (.f64 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(-.f64 (fma.f64 1/2 (/.f64 (.f64 angle angle) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(-.f64 (fma.f64 1/2 (/.f64 (.f64 (.f64 angle angle) (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 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 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.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 (pow.f64 b 2) (pow.f64 x-scale 2)))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(-.f64 (fma.f64 1/2 (/.f64 (.f64 angle angle) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))) (fma.f64 1/2 (/.f64 (pow.f64 angle 4) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.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 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)) (.f64 2/45 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(-.f64 (fma.f64 1/2 (/.f64 (.f64 (.f64 angle angle) (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 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)))) (fma.f64 1/2 (/.f64 (pow.f64 angle 4) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)))) y-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 (.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 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 b b) (.f64 x-scale x-scale)))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 6) (-.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 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 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)))))) (-.f64 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.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 (pow.f64 b 2) (pow.f64 x-scale 2))))) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(-.f64 (fma.f64 1/2 (/.f64 (pow.f64 angle 6) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (+.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 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 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (/.f64 (fma.f64 1/22674816000000 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 5) y-scale)) 1/1511654400000)) (/.f64 (.f64 y-scale x-scale) (.f64 (PI.f64) (fma.f64 b b (neg.f64 (.f64 a a)))))))))) (.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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-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 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (fma.f64 b b (neg.f64 (.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 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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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)))))))) (fma.f64 1/2 (/.f64 (.f64 angle angle) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))) (fma.f64 1/2 (/.f64 (pow.f64 angle 4) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.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 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)) (.f64 2/45 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (.f64 (PI.f64) (.f64 (.f64 (/.f64 (fma.f64 b b (neg.f64 (.f64 a a))) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000)) y-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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (.f64 y-scale y-scale)) (/.f64 (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 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(-.f64 (fma.f64 1/2 (/.f64 (pow.f64 angle 6) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.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 (/.f64 (.f64 x-scale x-scale) (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 (.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)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (/.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 (/.f64 (.f64 y-scale x-scale) (-.f64 (.f64 b b) (.f64 a a))) (PI.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 (.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 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 (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 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3))) 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 (.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 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))))))) (fma.f64 1/2 (/.f64 (.f64 (.f64 angle angle) (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 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)))) (fma.f64 1/2 (/.f64 (pow.f64 angle 4) (/.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.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 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.f64 (PI.f64) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 y-scale x-scale) (pow.f64 (PI.f64) 3)))) y-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 (.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 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 b b) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(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))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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)))
(sqrt.f64 (+.f64 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (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))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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)))
(sqrt.f64 (+.f64 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (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))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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)))
(sqrt.f64 (+.f64 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (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))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (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)))
(sqrt.f64 (+.f64 (/.f64 (/.f64 (.f64 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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)) (pow.f64 (+.f64 (/.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 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 (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))))))
(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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))
(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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 2)) (*.f64 y-scale y-scale))))))
(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))))))
(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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))
(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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 2)) (*.f64 y-scale y-scale))))))
(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))))))
(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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))
(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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 2)) (*.f64 y-scale y-scale))))))
(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))))))
(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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)) (.f64 x-scale x-scale))))))
(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 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 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 (-.f64 (.f64 b b) (.f64 a a)) 2)) (*.f64 y-scale y-scale))))))
(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))))))
(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))))))
(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 (pow.f64 a 4) (.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 (.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 -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 b 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 (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 b b) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (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)))))))
(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 (pow.f64 a 4) (.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 (.f64 b b) (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 (.f64 a a) (pow.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))))))) (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 (pow.f64 a 4) (.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 (.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 -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 b 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4)))) (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 (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 b b) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (fma.f64 1/2 (.f64 (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 2))) (pow.f64 b 4)) (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))))))))
(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 (pow.f64 a 4) (.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 (.f64 b b) (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 (.f64 a a) (pow.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/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 (pow.f64 a 4) (.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 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 (.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 -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 b 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4)))) (+.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 y-scale 2) (pow.f64 x-scale 2)))))) (.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 (pow.f64 b 6) (+.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)))))))))))
(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 (.f64 b b) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (fma.f64 1/2 (.f64 (.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 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 2))) (pow.f64 b 4)) (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 -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 (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) 2)) (pow.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)))))))) (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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) 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 (.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)))) (.f64 -8 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))) (pow.f64 b 6)))))))
(+.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 (pow.f64 a 4) (.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 (.f64 b b) (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 (.f64 a a) (pow.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/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 (pow.f64 a 4) (.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 (pow.f64 b 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 4) (.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 -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 (pow.f64 a 4) (.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 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (pow.f64 a 4) (.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)))) (.f64 -8 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (/.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 (pow.f64 a 4) (.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 b 6)) (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 (.f64 a a) (pow.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 2))
(.f64 (.f64 b b) (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 b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))) (.f64 b b))) (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2))) (.f64 b b))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))) (.f64 b b))) (fma.f64 -1/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 (+.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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4))) (pow.f64 b 4)))) (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2))) (.f64 b b))) (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4)) (fma.f64 -4 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 2))
(.f64 (.f64 b b) (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 b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))) (.f64 b b))) (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2))) (.f64 b b))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 b 2)))) (+.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 4))) (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 b 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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 2))) (.f64 b b))) (fma.f64 -1/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 (+.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 (.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)))) (pow.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))))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) 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 (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4))) (pow.f64 b 4)))) (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)))) (fma.f64 -4 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (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)))) (.f64 (/.f64 (.f64 a a) (/.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 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) -4)))) (.f64 (.f64 b b) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2))) (.f64 b b))) (fma.f64 -1/4 (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 (/.f64 (pow.f64 a 4) (.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 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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) 2)))) (/.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 b 4)) (fma.f64 -4 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4))))) (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 (.f64 a a) (pow.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 (/.f64 (.f64 (.f64 (.f64 a a) (pow.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))) -4)))) (.f64 (.f64 b b) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))
(/.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))) (.f64 x-scale x-scale))
(/.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))) (.f64 x-scale x-scale))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))))) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))
(+.f64 (/.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 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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)))) (/.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 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 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 x-scale x-scale) (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 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))))) (+.f64 (/.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 (pow.f64 x-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 (.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))))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.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))) (-.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 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.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))) (-.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 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 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 -1/4 (/.f64 (.f64 (pow.f64 x-scale 4) (.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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))))) (+.f64 (/.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 (pow.f64 x-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 (.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)))))))))
(fma.f64 -1/4 (/.f64 (.f64 (.f64 (pow.f64 x-scale 4) (-.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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))) (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale)))) (.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))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (+.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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)))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.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))) (-.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 1/2 (/.f64 (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.f64 y-scale y-scale))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 -1/4 (.f64 (/.f64 (pow.f64 x-scale 4) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 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 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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))) (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 (/.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 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (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 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.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))) (-.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 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 (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 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 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))))
(+.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 (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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 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 (.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (+.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 (-.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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 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 4))) (/.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 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (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))) (fma.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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (+.f64 (/.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)))) (pow.f64 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/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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.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))))) (.f64 (pow.f64 x-scale 6) (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))))))))
(fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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 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 4))) (/.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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (pow.f64 x-scale 6) (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)) (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (*.f64 y-scale y-scale)))))))))
(+.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (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))) (fma.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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (+.f64 (/.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)))) (pow.f64 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 (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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 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 x-scale 6) (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3)) (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 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 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))))
(+.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 (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)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 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 (.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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))) (+.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 (-.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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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 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 4))) (/.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 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (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))) (fma.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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (+.f64 (/.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)))) (pow.f64 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/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 (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)))))) (+.f64 (/.f64 (.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 (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 (pow.f64 x-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (.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))))) (.f64 (pow.f64 x-scale 6) (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))))))))
(fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (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 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (.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 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 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 4))) (/.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 (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 (fma.f64 b b (neg.f64 (.f64 a a))) 2) (/.f64 (.f64 y-scale y-scale) (.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 -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 (.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 (pow.f64 x-scale 6) (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)) (fma.f64 -2 (.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))) (+.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 4 (.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 (fma.f64 b b (neg.f64 (.f64 a a))) 2)))) (*.f64 y-scale y-scale)))))))))
(+.f64 (fma.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 (.f64 x-scale x-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 b b) (/.f64 (.f64 y-scale y-scale) (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))) (fma.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 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 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 (+.f64 (/.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)))) (pow.f64 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 (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 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 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 x-scale 6) (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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3)) (fma.f64 -2 (.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))) (+.f64 (/.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))))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.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))) (.f64 y-scale y-scale))
(/.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 y-scale y-scale))
(+.f64 (/.f64 (.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 -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 (/.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 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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) (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))))) (+.f64 (/.f64 (.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 -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))))))))
(fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.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))) (-.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))) (+.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 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (.f64 y-scale y-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 (.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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) (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))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.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 (/.f64 (.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 -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)))))))))
(fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.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))) (-.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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 -1/4 (/.f64 (.f64 (.f64 (pow.f64 y-scale 4) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (.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 (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 (.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 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (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 (.f64 y-scale y-scale) (/.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 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 -1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) 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 (.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (cos.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b)))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 1/180 (.f64 angle (PI.f64)))) 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 (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (-.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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 4))) (fma.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4))) (fma.f64 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 -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 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 6)) (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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/2 (/.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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 4))) (fma.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 6)) (/.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4))) (fma.f64 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 1/180 (.f64 angle (PI.f64)))) 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 (.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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (-.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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 4))) (fma.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4))) (fma.f64 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 -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 y-scale 6) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (.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 (pow.f64 y-scale 4) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -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 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 6)) (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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/2 (/.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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 y-scale 4))) (fma.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 2))) (.f64 x-scale x-scale))) (.f64 (.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 (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 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 6)) (/.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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (/.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 4))) (fma.f64 1/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 (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 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 (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 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))))) (/.f64 1 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (*.f64 b (neg.f64 a)))))))
(.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))))))) (.f64 1/4 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (*.f64 b (neg.f64 a)))))
(.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) y-scale)) 2))))))))) (.f64 1/4 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))))
(.f64 1 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))) (sqrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))) (cbrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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)))) (cbrt.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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)) 1)
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) y-scale)) 2))))))))) (.f64 4 (.f64 b (.f64 a (.f64 b (neg.f64 a)))))))
(neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))))))) (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))))))) (.f64 (/.f64 4 (pow.f64 (.f64 y-scale x-scale) 2)) (.f64 b (.f64 a (*.f64 b (neg.f64 a))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) y-scale)) 2))))))))) (.f64 (/.f64 4 (pow.f64 (.f64 y-scale x-scale) 2)) (.f64 b (.f64 a (*.f64 b (neg.f64 a))))))
(log.f64 (exp.f64 (.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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))))
(cbrt.f64 (.f64 (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a)))))) (.f64 (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))) (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))))))
(cbrt.f64 (.f64 (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 y-scale x-scale) 2) (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 b a) (.f64 b (neg.f64 a)))))) (.f64 (.f64 (.f64 b 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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/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 y-scale x-scale) 2) (neg.f64 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 a b)) (.f64 b (neg.f64 a)))) (.f64 b (.f64 a (.f64 b (neg.f64 a))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 x-scale x-scale)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2))))))) (.f64 (.f64 4 (.f64 a b)) (.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 y-scale x-scale) 2) (/.f64 (neg.f64 (sqrt.f64 (.f64 (/.f64 8 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (.f64 (.f64 b (.f64 a (.f64 b (neg.f64 a)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 x-scale x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.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 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))) (sqrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))))) (cbrt.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(pow.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)) 1/2)
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2))) 1)
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(log.f64 (exp.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(cbrt.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (*.f64 x-scale y-scale)) 2)))))
(cbrt.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (*.f64 a a))))) y-scale)) 2)))))
(cbrt.f64 (.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a)))) y-scale)) 2)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(exp.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64)))) 2) (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))) 2) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (.f64 2 (-.f64 (.f64 b b) (.f64 a a))))) (.f64 x-scale y-scale)) 2)))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 2 (fma.f64 b b (neg.f64 (.f64 a a))))) y-scale)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 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 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)) (.f64 y-scale y-scale))) 2) (pow.f64 (.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 2 (-.f64 (.f64 b b) (*.f64 a a)))) y-scale)) 2)))

eval35.5s (33.9%)

Compiler: Compiled 859925 to 526215 computations (38.8% saved)

prune796.0ms (0.8%)

Pruning

53 alts after pruning (53 fresh and 0 done)

	Pruned	Kept	Total
New	1586	53	1639
Fresh	0	0	0
Picked	1	0	1
Done	2	0	2
Total	1589	53	1642

Accurracy

43.4%

Counts

1642 → 53

Alt Table

Click to see full alt table

Status	Accuracy	Program
	3.3%	(fma.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))))))))
	0.8%	(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)))))))))))
	1.3%	(fma.f64 1/8 (.f64 (/.f64 x-scale (/.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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))))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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))))))))))))))))
	3.0%	(fma.f64 1/8 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))))))))
	4.6%	(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))))))))
	4.2%	(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))
	3.1%	(fma.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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.0%	(fma.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/8 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))))
	0.3%	(/.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)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (/.f64 (.f64 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	1.9%	(/.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)) (+.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 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	3.7%	(+.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)))))))))
	3.4%	(+.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))))))))
	3.9%	(.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)))))
	4.5%	(.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))))
	3.5%	(.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.0%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))))
▶	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))
	3.5%	(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.1%	(.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)))
	2.8%	(.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)))))))
	2.4%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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))))))))))
	1.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.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 (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))))))) (+.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)))))))
	4.5%	(.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)))))))
	4.9%	(.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)))))))
▶	4.9%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
	13.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))))))
	4.5%	(.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)))))))
	10.4%	(.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
	10.3%	(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 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))))))
	4.7%	(.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.0%	(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale b) (sqrt.f64 8)))
▶	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
▶	3.3%	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.6%	(.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)))))))
	2.9%	(.f64 (.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 (sqrt.f64 8) (.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	6.5%	(.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)))))))
	4.7%	(.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)))))))
	4.9%	(.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))))))))
	10.3%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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)))))))
	5.3%	(.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)))))))
	13.3%	(.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)))))))
▶	18.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))
	3.5%	(.f64 1/4 (.f64 y-scale (.f64 (.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)))))))))
	5.0%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	4.6%	(.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	10.3%	(.f64 1/4 (.f64 y-scale (.f64 (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))))))))
	13.4%	(.f64 1/4 (.f64 x-scale (.f64 (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))))))))
	4.7%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b))))))))
	4.7%	(.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.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)))))))
	5.7%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	6.3%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b)) (.f64 y-scale y-scale))))))))
	6.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))

Compiler

Compiled 13956 to 8934 computations (36% saved)

localize19.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

New	Accuracy	Program
✓	99.7%	(.f64 y-scale (.f64 b (sqrt.f64 8)))
✓	99.3%	(*.f64 b (sqrt.f64 8))
✓	99.3%	(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))

Compiler

Compiled 44 to 35 computations (20.5% saved)

series6.0ms (0%)

Counts

3 → 0

Calls

15 calls:

Time	Variable		Point	Expression
1.0ms	b	@	inf	(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
1.0ms	y-scale	@	0	(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
1.0ms	b	@	0	(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
0.0ms	b	@	inf	(.f64 y-scale (.f64 b (sqrt.f64 8)))
0.0ms	b	@	-inf	(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))

rewrite77.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1074×	`*-commutative`
932×	`sqrt-prod`
826×	`unswap-sqr`
656×	`swap-sqr`
402×	`sqr-pow`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	12	55
1	238	55
2	2675	41

Stop Event

1×	node limit

Counts

3 → 51

Calls

Call 1

Inputs
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(*.f64 b (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))

Outputs

(((+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (pow.f64 (*.f64 y-scale b) 2) 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>) ((*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (pow.f64 (*.f64 y-scale 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>) ((*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale b) 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>) ((*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((fabs.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log.f64 (exp.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale 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>) ((*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((exp.f64 (log.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 4 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)))

(((+.f64 (exp.f64 (log1p.f64 (*.f64 b (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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 b (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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 b (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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 b (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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 b (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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 2) (cbrt.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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 8 (*.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>) ((*.f64 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 512) (pow.f64 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((fabs.f64 (*.f64 b (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 b (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((cbrt.f64 (*.f64 (sqrt.f64 512) (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 b (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((exp.f64 (log.f64 (*.f64 b (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 b (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)))

(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 2) (cbrt.f64 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 8 (pow.f64 (*.f64 y-scale b) 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 (sqrt.f64 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 512) (pow.f64 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((sqrt.f64 (*.f64 8 (pow.f64 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log.f64 (pow.f64 (exp.f64 (*.f64 y-scale b)) (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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((cbrt.f64 (*.f64 (sqrt.f64 512) (pow.f64 (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (*.f64 b (sqrt.f64 8)) (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) #f)))

simplify58.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1004×	`unswap-sqr`
1000×	`associate-r`
804×	`associate-*r/`
784×	`associate-l`
766×	`distribute-lft-in`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	136	1127
1	348	1069
2	911	1051
3	3804	1051

Stop Event

1×	node limit

Counts

51 → 73

Calls

Call 1

Inputs
(+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1)
(-.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1))))
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(pow.f64 (sqrt.f64 (.f64 4 (.f64 y-scale b))) 2)
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1/2)
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1/3)
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(fabs.f64 (.f64 4 (.f64 y-scale b)))
(log.f64 (exp.f64 (.f64 4 (.f64 y-scale b))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 4 (.f64 y-scale b)))))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 1)
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 1))))
(pow.f64 (*.f64 b (sqrt.f64 8)) 1)
(pow.f64 (sqrt.f64 (*.f64 b (sqrt.f64 8))) 2)
(pow.f64 (*.f64 (sqrt.f64 2) (cbrt.f64 b)) 3)
(pow.f64 (.f64 8 (.f64 b b)) 1/2)
(pow.f64 (*.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3)
(sqrt.f64 (.f64 8 (.f64 b b)))
(fabs.f64 (*.f64 b (sqrt.f64 8)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) b))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 8)))))
(cbrt.f64 (*.f64 (sqrt.f64 512) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b (sqrt.f64 8))))
(exp.f64 (log.f64 (*.f64 b (sqrt.f64 8))))
(log1p.f64 (expm1.f64 (*.f64 b (sqrt.f64 8))))
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) -1)
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1))))
(pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 1)
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 2)
(pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 3)
(pow.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)) 1/2)
(pow.f64 (.f64 (sqrt.f64 512) (pow.f64 (.f64 y-scale b) 3)) 1/3)
(sqrt.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)))
(fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(log.f64 (pow.f64 (exp.f64 (*.f64 y-scale b)) (sqrt.f64 8)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(cbrt.f64 (.f64 (sqrt.f64 512) (pow.f64 (.f64 y-scale b) 3)))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))

Outputs
(+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1)
(.f64 4 (.f64 y-scale b))
(-.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)
(.f64 4 (.f64 y-scale b))
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
(.f64 4 (.f64 y-scale b))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 3)) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(.f64 4 (.f64 y-scale b))
(pow.f64 (sqrt.f64 (.f64 4 (.f64 y-scale b))) 2)
(.f64 4 (.f64 y-scale b))
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(.f64 4 (.f64 y-scale b))
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1/2)
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1/3)
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(fabs.f64 (.f64 4 (.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(log.f64 (exp.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(log.f64 (+.f64 1 (expm1.f64 (.f64 4 (.f64 y-scale b)))))
(.f64 4 (.f64 y-scale b))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(+.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) -1)
(*.f64 b (sqrt.f64 8))
(-.f64 (exp.f64 (log1p.f64 (*.f64 b (sqrt.f64 8)))) 1)
(*.f64 b (sqrt.f64 8))
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 1))
(*.f64 b (sqrt.f64 8))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (.f64 b (sqrt.f64 8))) (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) 3)) (+.f64 (exp.f64 (.f64 2 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b (sqrt.f64 8)))))))
(pow.f64 (*.f64 b (sqrt.f64 8)) 1)
(*.f64 b (sqrt.f64 8))
(pow.f64 (sqrt.f64 (*.f64 b (sqrt.f64 8))) 2)
(*.f64 b (sqrt.f64 8))
(pow.f64 (*.f64 (sqrt.f64 2) (cbrt.f64 b)) 3)
(*.f64 b (pow.f64 (sqrt.f64 2) 3))
(.f64 b (.f64 2 (sqrt.f64 2)))
(pow.f64 (.f64 8 (.f64 b b)) 1/2)
(sqrt.f64 (.f64 (.f64 8 b) b))
(sqrt.f64 (.f64 b (.f64 b 8)))
(sqrt.f64 (.f64 8 (.f64 b b)))
(pow.f64 (*.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3)
(cbrt.f64 (*.f64 (sqrt.f64 512) (pow.f64 b 3)))
(sqrt.f64 (.f64 8 (.f64 b b)))
(sqrt.f64 (.f64 (.f64 8 b) b))
(sqrt.f64 (.f64 b (.f64 b 8)))
(fabs.f64 (*.f64 b (sqrt.f64 8)))
(*.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 b (sqrt.f64 8)))))
(*.f64 b (sqrt.f64 8))
(cbrt.f64 (*.f64 (sqrt.f64 512) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b (sqrt.f64 8))))
(*.f64 b (sqrt.f64 8))
(exp.f64 (log.f64 (*.f64 b (sqrt.f64 8))))
(*.f64 b (sqrt.f64 8))
(log1p.f64 (expm1.f64 (*.f64 b (sqrt.f64 8))))
(*.f64 b (sqrt.f64 8))
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) -1)
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 1))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8)))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8))) (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8))))) (+.f64 1 (exp.f64 (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8)))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) (exp.f64 (.f64 2 (log1p.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 (*.f64 y-scale b) (sqrt.f64 8)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 1)
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 2)
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 3)
(.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))
(.f64 y-scale (.f64 b (*.f64 2 (sqrt.f64 2))))
(pow.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)) 1/2)
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 8))
(pow.f64 (.f64 (sqrt.f64 512) (pow.f64 (.f64 y-scale b) 3)) 1/3)
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (sqrt.f64 512)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)))
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 8))
(fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log.f64 (pow.f64 (exp.f64 (*.f64 y-scale b)) (sqrt.f64 8)))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(cbrt.f64 (.f64 (sqrt.f64 512) (pow.f64 (.f64 y-scale b) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (sqrt.f64 512)))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 y-scale b) (sqrt.f64 8))
(.f64 y-scale (.f64 b (sqrt.f64 8)))

localize17.0ms (0%)

Local Accuracy

Found 2 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(.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)

series1.0ms (0%)

Counts

2 → 24

Calls

6 calls:

Time	Variable		Point	Expression
0.0ms	b	@	inf	(.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2))
0.0ms	b	@	-inf	(.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2))
0.0ms	b	@	0	(.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2))
0.0ms	b	@	0	(*.f64 (sqrt.f64 8) b)
0.0ms	b	@	inf	(*.f64 (sqrt.f64 8) b)

rewrite64.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1668×	`add-sqr-sqrt`
1650×	`*-un-lft-identity`
1532×	`add-cube-cbrt`
1510×	`add-cbrt-cube`
178×	`pow1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	10	32
1	197	32
2	2131	32

Stop Event

1×	node limit

Counts

2 → 26

Calls

Call 1

Inputs
(*.f64 (sqrt.f64 8) b)
(.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))) #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))) #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))) #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))) #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))) #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))) #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))) #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))) #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))) #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))) #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))) #f)) ((exp.f64 (*.f64 (log.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))) #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))) #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))) #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))) #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))) #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))) #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))) #f)) ((sqrt.f64 (*.f64 2 (*.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))) #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))) #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))) #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))) #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))) #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))) #f)) ((exp.f64 (*.f64 (log.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))) #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))) #f)))

simplify60.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1202×	`associate-+r+`
1150×	`associate-+l+`
998×	`fma-def`
666×	`*-commutative`
548×	`unswap-sqr`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	66	802
1	147	802
2	567	802
3	2476	800
4	6646	800

Stop Event

1×	node limit

Counts

50 → 34

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 (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)))
(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))
(expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b)))
(exp.f64 (log.f64 (*.f64 (sqrt.f64 8) b)))
(exp.f64 (.f64 (log.f64 (.f64 (sqrt.f64 8) b)) 1))
(log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) b)))
(-.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 2 (.f64 8 (*.f64 b b))))
(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))
(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)))))
(exp.f64 (.f64 (log.f64 (.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) 1))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))))

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 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) b))) 1)
(*.f64 b (sqrt.f64 8))
(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 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))
(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))
(exp.f64 (.f64 (log.f64 (.f64 (sqrt.f64 8) b)) 1))
(*.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)))
(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 2 (.f64 8 (*.f64 b b))))
(sqrt.f64 (.f64 16 (.f64 b b)))
(sqrt.f64 (.f64 (.f64 b b) 16))
(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)))
(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)))
(exp.f64 (.f64 (log.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)))
(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)))

localize96.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	71.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
✓	67.1%	(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))))))
✓	62.0%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	61.8%	(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))

Compiler

Compiled 279 to 150 computations (46.2% saved)

series80.0ms (0.1%)

Counts

4 → 132

Calls

33 calls:

Time	Variable		Point	Expression
42.0ms	b	@	inf	(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))))))
4.0ms	angle	@	0	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
4.0ms	y-scale	@	0	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
4.0ms	angle	@	0	(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.0ms	x-scale	@	0	(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))))))

rewrite80.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

754×	`add-sqr-sqrt`
740×	`*-un-lft-identity`
736×	`pow1`
698×	`add-exp-log`
698×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	35	292
1	759	292

Stop Event

1×	node limit

Counts

4 → 42

Calls

Call 1

Inputs
(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))

Outputs
(((.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 1 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)))
(((.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 1 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)))
(((.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 1 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((pow.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((pow.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((cbrt.f64 (.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)))
(((pow.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log.f64 (exp.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((cbrt.f64 (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.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>) ((cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sin.f64 (.f64 angle (.f64 1/180 (PI.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 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))))))) #f)))

simplify213.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1654×	`associate-r`
1512×	`associate-/r/`
962×	`associate-l`
892×	`*-commutative`
784×	`times-frac`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	510	22544
1	1545	22222
2	7394	22222

Stop Event

1×	node limit

Counts

174 → 259

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 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 (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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.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/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.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/32 (/.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 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.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/32 (/.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 1/4 (.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/64 (/.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 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/4 (.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)))) 2) (.f64 (pow.f64 b 2) (sqrt.f64 8))))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.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/32 (/.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/8 (/.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/4 (.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/64 (/.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/32 (/.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/8 (/.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/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(.f64 -1/4 (.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)))) 2) (.f64 (pow.f64 b 2) (sqrt.f64 8))))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/4 (.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/32 (/.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/8 (/.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/4 (.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/64 (/.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/32 (/.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/8 (/.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/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(.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 (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 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 (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 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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 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 (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/8 (/.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 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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 1/4 (.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 1/4 (.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 1/4 (.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 1/4 (.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 1/4 (.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 1/4 (.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 1/4 (.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 1/4 (.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 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 (.f64 1/8 (/.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/4 (.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/32 (/.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/8 (/.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/4 (.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/64 (/.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/32 (/.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/8 (/.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/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 b (.f64 (cos.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 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/64 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.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 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 -1/4 (.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/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 -1/4 (.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/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (.f64 -1/64 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(.f64 1 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(.f64 1 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) 1)
(.f64 1 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) (sqrt.f64 2))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(pow.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) 1/2)
(pow.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) 1)
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(cbrt.f64 (.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(pow.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) 1)
(log.f64 (exp.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(cbrt.f64 (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))))))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))

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 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 (.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 (*.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 (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 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 angle 1/180))
(+.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 1/180 (*.f64 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 angle 7) (*.f64 (pow.f64 (PI.f64) 7) -1/30855889612800000000)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(/.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 1/180 (*.f64 angle (PI.f64)))) b)))
(/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.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 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.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 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(+.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 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (fma.f64 1/16 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) x-scale))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 1/16 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (pow.f64 b 5))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (sqrt.f64 2) (pow.f64 a 6))) x-scale)))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (/.f64 1/16 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (pow.f64 b 5))) (.f64 (/.f64 (.f64 (sqrt.f64 2) (pow.f64 a 6)) x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (*.f64 angle (PI.f64)))) a)))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3)) (pow.f64 b 4))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4)))))
(+.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 1/180 (.f64 angle (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 1/16 (/.f64 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (/.f64 (.f64 (.f64 1/16 (.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (*.f64 x-scale (pow.f64 a 5)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (/.f64 (.f64 (.f64 1/16 (.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (.f64 x-scale (pow.f64 a 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 1/180 (*.f64 angle (PI.f64)))) a))))
(/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale)
(.f64 (neg.f64 (/.f64 (sqrt.f64 2) x-scale)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) a))) (.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) -1/2))
(fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) -1/2 (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
(-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) -1/2)))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (pow.f64 b 4)))) 1/8 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) -1/2 (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale)))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4))) 1/8 (-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (fma.f64 -1/16 (/.f64 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) -1/2))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (pow.f64 b 4)))) 1/8 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) -1/2 (.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (pow.f64 b 6)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)))) -1/16)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4))) 1/8 (-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) -1/2 (.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (pow.f64 b 6)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)))) -1/16)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) a))))
(.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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 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 (sqrt.f64 2) x-scale) (neg.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 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 (.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 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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 2)))))) (.f64 (pow.f64 angle 6) (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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (+.f64 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (-.f64 (.f64 (/.f64 (.f64 b b) (.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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 2))))) (.f64 (pow.f64 angle 6) (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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b 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 1/180 (*.f64 angle (PI.f64)))) a)))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (.f64 angle (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 3)) (pow.f64 b 4))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (.f64 -1/8 (/.f64 (sqrt.f64 2) x-scale)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4)))))
(+.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 1/180 (.f64 angle (PI.f64)))) a))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 b 4)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 x-scale (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 1/16 (/.f64 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (/.f64 (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (pow.f64 b 4)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (/.f64 (.f64 (.f64 1/16 (.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (*.f64 x-scale (pow.f64 a 5)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (pow.f64 b 4))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (/.f64 (.f64 (.f64 1/16 (.f64 (sqrt.f64 2) (pow.f64 b 6))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (.f64 x-scale (pow.f64 a 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 1/180 (*.f64 angle (PI.f64)))) b)))
(/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))
(+.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 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(+.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 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(+.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 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (fma.f64 1/16 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) x-scale))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))) (.f64 (/.f64 1/16 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (pow.f64 b 5))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (sqrt.f64 2) (pow.f64 a 6))) x-scale)))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (.f64 (/.f64 1/16 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) (pow.f64 b 5))) (.f64 (/.f64 (.f64 (sqrt.f64 2) (pow.f64 a 6)) x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 1/180 (*.f64 angle (PI.f64)))) b))))
(/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 x-scale b)) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))
(+.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 1/180 (.f64 angle (PI.f64)))) b))) (.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale)) -1/2))
(fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (.f64 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 x-scale b)) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(+.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 1/180 (.f64 angle (PI.f64)))) b))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) x-scale)) (/.f64 (.f64 1/8 (.f64 (.f64 (sqrt.f64 2) (pow.f64 a 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))
(-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (.f64 (/.f64 1/8 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3) (.f64 x-scale (pow.f64 b 3)))) (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (sqrt.f64 2))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(+.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 1/180 (.f64 angle (PI.f64)))) b))) (fma.f64 -1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b) x-scale)) (fma.f64 1/8 (/.f64 (sqrt.f64 2) (/.f64 (.f64 (.f64 x-scale (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -1/16 (/.f64 (.f64 (.f64 (sqrt.f64 2) (pow.f64 a 6)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 x-scale (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))
(-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (.f64 -1/16 (.f64 (/.f64 (sqrt.f64 2) (.f64 x-scale (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 b 5)))))) (/.f64 (sqrt.f64 2) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))))
(-.f64 (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (/.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 b 3)))) (.f64 -1/16 (.f64 (/.f64 (sqrt.f64 2) (.f64 x-scale (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 b 5)))))) (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 (sqrt.f64 2) (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 1/4 (.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 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 -1/4 (.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 -1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) -1/4))
(.f64 -1/4 (.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 -1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) -1/4))
(.f64 -1/4 (.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 -1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) -1/4))
(.f64 -1/4 (.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 -1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale)) -1/4))
(.f64 1/4 (.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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))) 1/4))
(+.f64 (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.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 1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
(+.f64 (.f64 -1/32 (/.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 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.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 -1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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 1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))) (fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) b))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)) (fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b))))
(+.f64 (.f64 -1/32 (/.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 1/4 (.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/64 (/.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 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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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 1/64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 6) (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 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) b)))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
(+.f64 (.f64 1/8 (/.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/4 (.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) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))
(fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (.f64 1/4 y-scale)))
(+.f64 (.f64 -1/32 (/.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/8 (/.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/4 (.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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (.f64 1/4 y-scale))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))))
(+.f64 (.f64 1/64 (/.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/32 (/.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/8 (/.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/4 (.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/64 (/.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8)))) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 -1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) y-scale))) (fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))))
(fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)) y-scale)) (fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))))
(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
(+.f64 (.f64 -1/8 (/.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/4 (.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) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4)))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4)))
(+.f64 (.f64 1/32 (/.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/8 (/.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/4 (.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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) 1/32 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) 1/32 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))))
(+.f64 (.f64 -1/64 (/.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/32 (/.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/8 (/.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/4 (.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/64 (/.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8)))) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) y-scale))) -1/64 (fma.f64 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) 1/32 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4)))))
(fma.f64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)) y-scale)) -1/64 (fma.f64 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) 1/32 (fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4)))))
(.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 2) b) (sqrt.f64 8)))
(.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8))) 1/4))
(+.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 (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)))
(fma.f64 1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (.f64 1/8 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (.f64 (.f64 y-scale (.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 1/8 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) (.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8))) 1/4)))
(fma.f64 1/8 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) (.f64 y-scale (.f64 (.f64 b (*.f64 (sqrt.f64 2) (sqrt.f64 8))) 1/4)))
(+.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 (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 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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))))
(fma.f64 1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (.f64 1/8 (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (.f64 (.f64 y-scale (.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 (.f64 x-scale x-scale) (/.f64 b (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 angle 4) (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 (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/8 (+.f64 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 2))))) (.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8))) 1/4)))
(fma.f64 1/8 (+.f64 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 2))))) (.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8))) 1/4)))
(+.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 (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/8 (/.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 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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)))))
(fma.f64 1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (sqrt.f64 8))) (fma.f64 1/8 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (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 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) (.f64 1/8 (+.f64 (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (.f64 (.f64 y-scale (.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 (.f64 x-scale x-scale) (/.f64 b (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 angle 4) (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 (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/4 (.f64 (.f64 (sqrt.f64 2) b) (.f64 y-scale (sqrt.f64 8))) (.f64 1/8 (+.f64 (+.f64 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 2))))) (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (sqrt.f64 2) (.f64 (.f64 (+.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale b) (/.f64 x-scale b)) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (.f64 b b))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) 2)))))) (sqrt.f64 8)) (*.f64 (pow.f64 angle 6) y-scale)))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) b) (.f64 y-scale (sqrt.f64 8))) (.f64 1/8 (+.f64 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 angle angle) (sqrt.f64 8))) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) (+.f64 (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 2)))) (.f64 (.f64 x-scale (/.f64 x-scale b)) (.f64 (sqrt.f64 2) (.f64 (.f64 (+.f64 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (-.f64 (.f64 (/.f64 (.f64 b b) (.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 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) (-.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 4)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale b) (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (.f64 (/.f64 (.f64 -1/32400 (.f64 b b)) x-scale) (/.f64 (pow.f64 (PI.f64) 2) x-scale))))) 2))))) (sqrt.f64 8)) (*.f64 (pow.f64 angle 6) y-scale))))))))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.f64 1/4 (.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 1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (.f64 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))) 1/4))
(.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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
(+.f64 (.f64 1/8 (/.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/4 (.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/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))
(fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (.f64 1/4 y-scale)))
(+.f64 (.f64 -1/32 (/.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/8 (/.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/4 (.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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (.f64 1/4 y-scale))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))))
(+.f64 (.f64 1/64 (/.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/32 (/.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/8 (/.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/4 (.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/64 (/.f64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8)))) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 -1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) 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))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5) y-scale))) (fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) y-scale))) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))))
(fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 a 5)) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)) y-scale)) (fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (.f64 (pow.f64 b 4) (sqrt.f64 8)) y-scale))) (fma.f64 1/8 (.f64 (/.f64 (sqrt.f64 2) a) (.f64 (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) y-scale)) (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale)))))
(.f64 1/4 (.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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))) 1/4))
(+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
(+.f64 (.f64 -1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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 1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))) (fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) b))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)) (fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b))))
(+.f64 (.f64 -1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/64 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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 1/64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 6) (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 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) b)))))
(fma.f64 -1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))))
(.f64 -1/4 (.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 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))
(+.f64 (.f64 -1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 -1/4 (.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/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))) (/.f64 b y-scale))) (.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (/.f64 y-scale b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))))) (.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))
(fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))) (.f64 1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))) (/.f64 b y-scale))) (fma.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (.f64 1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (/.f64 y-scale b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))))) (fma.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (.f64 1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 -1/4 (.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/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (.f64 -1/64 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))
(fma.f64 -1/8 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (.f64 a a) (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/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))) (fma.f64 1/32 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 4) (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/64 (/.f64 (.f64 (.f64 (sqrt.f64 2) y-scale) (.f64 (.f64 (pow.f64 a 6) (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 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))) (/.f64 b y-scale))) (fma.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (/.f64 (pow.f64 b 3) y-scale))) (.f64 -1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (.f64 (/.f64 y-scale b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))))) (fma.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 b (sqrt.f64 8))) y-scale)) (fma.f64 1/32 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 3)) (.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (.f64 (pow.f64 a 4) (sqrt.f64 8))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3)) y-scale)) (.f64 -1/64 (.f64 (/.f64 (sqrt.f64 2) (pow.f64 b 5)) (/.f64 (.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 5)))))))
(.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 1 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sqrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log.f64 (exp.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (pow.f64 (cos.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) 2)))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(exp.f64 (log.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 1 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) (pow.f64 (sin.f64 (.f64 (*.f64 angle 1/180) (PI.f64))) 2)))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) 1)
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 1 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))
(.f64 (sqrt.f64 2) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b 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 1/180 (.f64 angle (PI.f64)))) 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 2) (sqrt.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) 1/2)
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) 1)
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(cbrt.f64 (.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))) (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(cbrt.f64 (.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(cbrt.f64 (pow.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale)))))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))
(pow.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) 1)
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(log.f64 (exp.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(cbrt.f64 (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4))))))
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(.f64 (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 a (.f64 x-scale x-scale)) a) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 angle 1/180) (PI.f64))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 (.f64 (*.f64 x-scale y-scale) (sqrt.f64 8)) 1/4))
(.f64 x-scale (.f64 (.f64 y-scale (.f64 1/4 (sqrt.f64 8))) (sqrt.f64 (.f64 2 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (/.f64 a (.f64 x-scale x-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))))))

localize151.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	67.1%	(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)))))
✓	62.2%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	61.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	37.8%	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))

Compiler

Compiled 398 to 270 computations (32.2% saved)

series31.0ms (0%)

Counts

4 → 108

Calls

33 calls:

Time	Variable		Point	Expression
3.0ms	a	@	inf	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
3.0ms	y-scale	@	0	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
3.0ms	angle	@	0	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
2.0ms	x-scale	@	0	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
2.0ms	angle	@	-inf	(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))

rewrite79.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

834×	`add-sqr-sqrt`
812×	`*-un-lft-identity`
800×	`pow1`
766×	`add-exp-log`
766×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	40	290
1	864	290

Stop Event

1×	node limit

Counts

4 → 41

Calls

Call 1

Inputs
(.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))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(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)))))

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

simplify143.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1678×	`associate-r`
1128×	`times-frac`
972×	`associate-l`
878×	`*-commutative`
732×	`associate-/l*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	503	21719
1	1640	20395

Stop Event

1×	node limit

Counts

149 → 218

Calls

Call 1

Inputs
(.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 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 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 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 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 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 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 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 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 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 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 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 (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 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 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 6) (.f64 (-.f64 (+.f64 (.f64 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 2 (/.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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))))) (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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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 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 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 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 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 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 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 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 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 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 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 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.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 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.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 b (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (.f64 1/4 (.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 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 -1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 1/4 (.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/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (.f64 1/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(+.f64 (.f64 1/8 (/.f64 (.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 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (.f64 1/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))))
(.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))))
(.f64 -1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
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 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))))))
(/.f64 (*.f64 (sqrt.f64 2) b) x-scale)
(+.f64 (/.f64 (.f64 (sqrt.f64 2) b) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (*.f64 (sqrt.f64 2) b))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) b) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)))) (.f64 (sqrt.f64 2) b))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (sqrt.f64 2) b)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 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 2 (/.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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 (/.f64 (.f64 (sqrt.f64 2) b) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)))) (.f64 (sqrt.f64 2) b))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (*.f64 (sqrt.f64 2) b))))))
(/.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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 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 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))))
(.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 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 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 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 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 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale)
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))))
(/.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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.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 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.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/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))))
(.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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(pow.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
(neg.f64 (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 y-scale x-scale) 2))))
(log.f64 (exp.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(exp.f64 (log.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(log1p.f64 (expm1.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) 1)
(.f64 1 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(pow.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))) 1/2)
(pow.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))) 1)
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(cbrt.f64 (.f64 2 (.f64 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))

Outputs
(.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 y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) b)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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) (sqrt.f64 8)) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))))) (.f64 b (sqrt.f64 2))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) b))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (.f64 1/8 (/.f64 y-scale (sqrt.f64 2))) (/.f64 (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (.f64 (sqrt.f64 8) (.f64 angle angle))) (/.f64 b (.f64 x-scale x-scale)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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)))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))))) (.f64 b (sqrt.f64 2))) (fma.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) b)) (.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 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) b))) 2)))))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (.f64 (sqrt.f64 8) (.f64 angle angle))) (/.f64 b (.f64 x-scale x-scale)))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (.f64 1/8 (/.f64 y-scale (sqrt.f64 2))) (/.f64 (.f64 x-scale x-scale) (/.f64 b (.f64 (sqrt.f64 8) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 2)))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 6) (.f64 (-.f64 (+.f64 (.f64 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 2 (/.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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))))) (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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))))) (.f64 b (sqrt.f64 2))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) (pow.f64 angle 6)) (.f64 (sqrt.f64 8) (+.f64 (.f64 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 b b) (/.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 (.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) b))) 2))))))))) b)) (fma.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) b)) (.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 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale)))) b))) 2))))))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (.f64 (sqrt.f64 8) (.f64 angle angle))) (/.f64 b (.f64 x-scale x-scale)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (-.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 x-scale (.f64 x-scale (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 2))))) (.f64 b b)))) (.f64 (pow.f64 angle 6) (sqrt.f64 8))) (/.f64 b (.f64 x-scale x-scale)))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (.f64 1/8 (/.f64 y-scale (sqrt.f64 2))) (/.f64 (.f64 x-scale x-scale) (/.f64 b (.f64 (sqrt.f64 8) (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (*.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 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 y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (.f64 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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 1/4 (.f64 y-scale (*.f64 (sqrt.f64 8) x-scale))))
(.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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1/4))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 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 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.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)))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8))))))
(+.f64 (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.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))))))))))))
(fma.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8)))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (.f64 1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(.f64 1/4 (.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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 1/4 y-scale))
(+.f64 (.f64 1/4 (.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 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
(.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
(+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))))))
(fma.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (/.f64 (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (pow.f64 b 5)) (/.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(.f64 -1/4 (.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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 (.f64 (.f64 y-scale -1/4) (.f64 b (sqrt.f64 2))) (.f64 (sqrt.f64 8) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (fma.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (/.f64 (.f64 1/8 (.f64 y-scale (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3)))))
(fma.f64 -1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (/.f64 (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (fma.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (/.f64 (.f64 1/8 (.f64 y-scale (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (pow.f64 b 5)) (/.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(.f64 1/4 (.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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 1/4 y-scale))
(+.f64 (.f64 1/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
(.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (.f64 1/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))))))
(fma.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))))
(+.f64 (.f64 1/8 (/.f64 (.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 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5))))) (+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))) (+.f64 (.f64 1/4 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (/.f64 (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (.f64 (pow.f64 a 4) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))) (.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (pow.f64 b 5)) (/.f64 (pow.f64 a 6) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))) (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) 1/4))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(.f64 1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 1/4 (.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/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8))))))
(+.f64 (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 1/4 (.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/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8)))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (.f64 1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2)))))))
(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
(+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8))))))
(fma.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2))))) (/.f64 (.f64 1/8 y-scale) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (.f64 (pow.f64 b 4) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8))) (.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 5)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (fma.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (sqrt.f64 2))))) (.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 b 6) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 5))))))
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 (.f64 (.f64 angle angle) -1/64800) (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 (.f64 angle angle) -1/64800))))
(+.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 (.f64 angle angle) -1/64800))) (fma.f64 (*.f64 (pow.f64 angle 6) -1/24488801280000000) (pow.f64 (PI.f64) 6) 1))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 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 (PI.f64) (*.f64 1/180 angle)))
(+.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/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (.f64 (PI.f64) (.f64 1/180 angle))))
(+.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))))))
(/.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 (.f64 (sqrt.f64 2) b) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (*.f64 (sqrt.f64 2) b))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 angle angle) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))) b))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (/.f64 b (.f64 angle angle)))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) b) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)))) (.f64 (sqrt.f64 2) b))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (.f64 (sqrt.f64 2) b)))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale (pow.f64 angle 4)) (-.f64 (fma.f64 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) b))) 2))) (.f64 b (sqrt.f64 2))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 angle angle) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale))))) b)))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (+.f64 (/.f64 (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 2)) (/.f64 b (pow.f64 angle 4))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (/.f64 b (.f64 angle angle))))) (*.f64 (/.f64 (sqrt.f64 2) x-scale) b))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 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 2 (/.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 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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 (/.f64 (.f64 (sqrt.f64 2) b) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))))) (.f64 (sqrt.f64 2) b))) 2)))) (.f64 (sqrt.f64 2) b))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/2 (/.f64 x-scale (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 angle 6) (+.f64 (.f64 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 b b) (/.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 (.f64 b b) (pow.f64 (sqrt.f64 2) 2)) (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) (-.f64 (fma.f64 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) b))) 2)))))))))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale b)) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale (pow.f64 angle 4)) (-.f64 (fma.f64 2 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 -1/1574640000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))) b))) 2))) (.f64 b (sqrt.f64 2))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 angle angle) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (*.f64 x-scale x-scale))))) b))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 2 (+.f64 (.f64 (/.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 x-scale (.f64 x-scale (.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 2))))) (.f64 b b)))) (/.f64 b (pow.f64 angle 6)))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (+.f64 (/.f64 (-.f64 (fma.f64 -1/1574640000 (.f64 (/.f64 a (/.f64 x-scale a)) (/.f64 (pow.f64 (PI.f64) 4) x-scale)) (/.f64 (.f64 2 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (.f64 b b)))) (.f64 x-scale x-scale))) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) b)) 2)) (/.f64 b (pow.f64 angle 4))) (/.f64 (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 x-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) x-scale))) (/.f64 b (.f64 angle angle))))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(/.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 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.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 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 2)) (/.f64 (.f64 b b) (.f64 (.f64 x-scale a) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(+.f64 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))))
(+.f64 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 a 5) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5) (pow.f64 (sqrt.f64 2) 5))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(/.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 (PI.f64) (*.f64 1/180 angle))) b)))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale)
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 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 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))))
(+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (.f64 -1/2 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 x-scale (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))))) (fma.f64 -1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale)))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))))
(+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 a 6) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (/.f64 (.f64 -1/2 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 x-scale (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (+.f64 (fma.f64 -1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (.f64 1/2 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (/.f64 x-scale (pow.f64 a 6)))) (.f64 (pow.f64 b 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b (sqrt.f64 2)))))))
(.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 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) 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 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))))
(.f64 -1 (+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
(-.f64 (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))))))
(+.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 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (.f64 1/2 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 x-scale (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))))))
(-.f64 (fma.f64 1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (/.f64 (neg.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) (sqrt.f64 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale b)))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b (sqrt.f64 2))) x-scale))
(+.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 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))))))
(fma.f64 -1 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 a 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (/.f64 (.f64 -1/2 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6))) (.f64 (.f64 x-scale (pow.f64 (sqrt.f64 2) 5)) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 5)))))))
(-.f64 (-.f64 (fma.f64 1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (.f64 -1/2 (pow.f64 a 6)) (/.f64 (.f64 (pow.f64 b 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) x-scale)))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))))) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b (sqrt.f64 2))) x-scale))
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale))
(/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))) x-scale)
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(neg.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale)))
(/.f64 (neg.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))) x-scale)
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(neg.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale)))
(/.f64 (neg.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))) x-scale)
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(neg.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale)))
(/.f64 (neg.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))) x-scale)
(.f64 -1 (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))
(neg.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.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 x-scale)))
(/.f64 (neg.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))))) x-scale)
(/.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 (PI.f64) (*.f64 1/180 angle))) b)))
(/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale)
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3) (pow.f64 b 3))))))))
(+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (.f64 -1/2 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 x-scale (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))))) (fma.f64 -1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale)))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)))) (+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (pow.f64 b 5)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))))))))
(+.f64 (+.f64 (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 a 6) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (/.f64 (.f64 -1/2 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 x-scale (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 3))))))
(+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (+.f64 (fma.f64 -1/2 (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (/.f64 x-scale (pow.f64 a 4))) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) (/.f64 (.f64 1/2 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (/.f64 x-scale (pow.f64 a 6)))) (.f64 (pow.f64 b 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 b (sqrt.f64 2)))))))
(/.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 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.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 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 2)) (/.f64 (.f64 b b) (.f64 (.f64 x-scale a) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.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 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(+.f64 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale (.f64 (sqrt.f64 2) (.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/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))))
(+.f64 (.f64 (/.f64 (.f64 b b) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 a 5) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5) (pow.f64 (sqrt.f64 2) 5))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(.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 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(neg.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)) (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 2)) (/.f64 (.f64 b b) (.f64 (.f64 x-scale a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))
(-.f64 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (.f64 -1 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 2)) (/.f64 (.f64 b b) (.f64 (.f64 x-scale a) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))))
(-.f64 (fma.f64 1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (neg.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 x-scale (sqrt.f64 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 x-scale (.f64 (pow.f64 (sqrt.f64 2) 3) (.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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 x-scale (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)))) (.f64 -1 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 2)) (/.f64 (.f64 b b) (.f64 (.f64 x-scale a) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 6) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 (pow.f64 a 5) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 5) (pow.f64 (sqrt.f64 2) 5))))) (-.f64 (fma.f64 1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) x-scale) (/.f64 (/.f64 (pow.f64 b 4) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))) (neg.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 x-scale (sqrt.f64 2))))))
(pow.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(neg.f64 (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(log.f64 (exp.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))
(cbrt.f64 (.f64 -1/4 (.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))) (.f64 -1/4 (.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))))))))
(cbrt.f64 (pow.f64 (.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2)))) 3))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(exp.f64 (log.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(log1p.f64 (expm1.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 1/4 (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))))) (.f64 (/.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (pow.f64 (.f64 x-scale y-scale) 2))))
(.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) 1)
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(.f64 1 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(pow.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))) 1/2)
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(pow.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))) 1)
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(cbrt.f64 (.f64 2 (.f64 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale))))))))
(cbrt.f64 (.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(cbrt.f64 (.f64 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale))) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale))))) 2)))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (*.f64 x-scale x-scale)))))

localize331.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	62.0%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
	61.8%	(cos.f64 (.f64 angle (.f64 1/180 (PI.f64))))
✓	53.7%	(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))))))
✓	40.4%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))

Compiler

Compiled 926 to 571 computations (38.3% saved)

series81.0ms (0.1%)

Counts

2 → 84

Calls

21 calls:

Time	Variable		Point	Expression
11.0ms	angle	@	0	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))
7.0ms	x-scale	@	inf	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))
6.0ms	angle	@	0	(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))))))
6.0ms	y-scale	@	inf	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))
6.0ms	x-scale	@	0	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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)))))

rewrite74.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

976×	`add-sqr-sqrt`
954×	`*-un-lft-identity`
946×	`pow1`
900×	`add-exp-log`
900×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	45	570
1	997	570

Stop Event

1×	node limit

Counts

2 → 16

Calls

Call 1

Inputs

(*.f64 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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)))))

(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))))))

Outputs

(((pow.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) 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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)) ((log.f64 (exp.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)) ((cbrt.f64 (*.f64 (*.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)) ((expm1.f64 (log1p.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)) ((exp.f64 (log.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)) ((log1p.f64 (expm1.f64 (*.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 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (pow.f64 (*.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.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 (pow.f64 (*.f64 x-scale y-scale) 2) (*.f64 -1/4 (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))))) (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))))))) #f)))

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

simplify326.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1668×	`associate-r`
1196×	`*-commutative`
1042×	`associate-/l*`
960×	`associate-l`
954×	`associate-/r*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	631	54662
1	2247	53736

Stop Event

1×	node limit

Counts

100 → 136

Calls

Call 1

Inputs
(.f64 1/4 (.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/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.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/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/4 (.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/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 6) (.f64 (-.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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/4 (.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 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 b (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 5) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 b (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 5) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 6) (.f64 (-.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 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 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (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 (.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/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 5) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.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 (.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/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 5) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(.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/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 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/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))) (+.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 (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)) (.f64 (pow.f64 angle 4) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 2)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 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)))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/612220032000000 (/.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) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (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 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2))))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 6) (.f64 b (sqrt.f64 8)))))) (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/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))) (+.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 (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)) (.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 8)))))) (sqrt.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (.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 (sqrt.f64 2) x-scale)
(+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 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)))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/612220032000000 (/.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) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/816293376000000 (/.f64 (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 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2))))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (pow.f64 angle 6))) (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 6) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale))))
(/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 6) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale))))
(/.f64 (.f64 (sqrt.f64 2) (sin.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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) (sin.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/2 (/.f64 (.f64 (pow.f64 y-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 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 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale))))
(/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.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 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 6) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-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))))) x-scale)
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.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 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 6) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(pow.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale))))))) 1)
(log.f64 (exp.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(cbrt.f64 (.f64 (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(expm1.f64 (log1p.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(exp.f64 (log.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(log1p.f64 (expm1.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(.f64 1 (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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 (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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)
(pow.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 1)
(log.f64 (exp.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(expm1.f64 (log1p.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(exp.f64 (log.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(log1p.f64 (expm1.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))

Outputs
(.f64 1/4 (.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 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (sqrt.f64 8) (.f64 b (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (sqrt.f64 8) (.f64 b (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (pow.f64 x-scale 4) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 b (sqrt.f64 8)))))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 6) (.f64 (-.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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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)))) 6) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (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 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.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))))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/4 (.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/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (sqrt.f64 8) (.f64 b (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))))) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 x-scale x-scale)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (pow.f64 x-scale 6) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (.f64 (.f64 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2))) (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) -1/2))))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (pow.f64 x-scale 4) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 b (sqrt.f64 8)))))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (/.f64 (.f64 (sqrt.f64 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 3))) (.f64 (.f64 (*.f64 y-scale y-scale) b) (sqrt.f64 8)))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 3)))) (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 b (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 5) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 b (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-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 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (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 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 5)))) (fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (/.f64 (.f64 (sqrt.f64 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 3))) (.f64 (.f64 (.f64 y-scale y-scale) b) (sqrt.f64 8))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (/.f64 (sqrt.f64 2) y-scale)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 2))))) (/.f64 (.f64 -1/2 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 x-scale 5)))) (fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 3)))) (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (/.f64 (.f64 (sqrt.f64 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 3))) (.f64 (.f64 (*.f64 y-scale y-scale) b) (sqrt.f64 8)))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 3)))) (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 b (.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 5) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 3) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 b (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-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 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (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 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 5)))) (fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (/.f64 (.f64 (sqrt.f64 2) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 3))) (.f64 (.f64 (.f64 y-scale y-scale) b) (sqrt.f64 8))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (sqrt.f64 2) (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 b (sqrt.f64 8)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (/.f64 (sqrt.f64 2) y-scale)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 2))))) (/.f64 (.f64 -1/2 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 x-scale 5)))) (fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (.f64 (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 3)))) (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b (sqrt.f64 8)) (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))))
(+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b (sqrt.f64 8)) (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (pow.f64 y-scale 4) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) b))))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 6) (.f64 (-.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 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 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (+.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 (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 x-scale 2))) (.f64 b (sqrt.f64 8))))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (pow.f64 y-scale 6) (.f64 (.f64 b (sqrt.f64 8)) (-.f64 (.f64 -1/4 (/.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 (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 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 1/2 (.f64 (/.f64 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (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 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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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))))))))) (fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b (sqrt.f64 8)) (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2)))) (/.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 (pow.f64 (sqrt.f64 2) 2) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale))))) 1/2) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 y-scale 6)))) (fma.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (sqrt.f64 2) x-scale)) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (.f64 y-scale b))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (pow.f64 y-scale 4) (/.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))) 2)) b)))))))))
(.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 b (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(+.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/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.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/8 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 3))) (.f64 (.f64 b (sqrt.f64 8)) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))) (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 3)) (.f64 b (sqrt.f64 8))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 5) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.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))))) (fma.f64 1/8 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 3))) (.f64 (.f64 b (sqrt.f64 8)) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (.f64 1/8 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 5))) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (fma.f64 1/8 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 3)) (.f64 b (sqrt.f64 8))))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)))) (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)))))))))))
(.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 b (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(+.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/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.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/8 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 3))) (.f64 (.f64 b (sqrt.f64 8)) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))) (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 3)) (.f64 b (sqrt.f64 8))))))))
(+.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 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 3) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 5) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 (pow.f64 x-scale 2) (.f64 (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.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))))) (fma.f64 1/8 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 3))) (.f64 (.f64 b (sqrt.f64 8)) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))) (.f64 1/8 (+.f64 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 5))) (.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (fma.f64 1/8 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 3)) (.f64 b (sqrt.f64 8))))) (.f64 1/8 (+.f64 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 5)))) (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)))))))))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 x-scale (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (.f64 b (sqrt.f64 8))))))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))) (+.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 (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)) (.f64 (pow.f64 angle 4) (*.f64 b (sqrt.f64 8)))))) (sqrt.f64 2)))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))) (.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/4199040000)))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)) (.f64 (*.f64 b (sqrt.f64 8)) (pow.f64 angle 4)))))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 x-scale (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (.f64 b (sqrt.f64 8))))))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (/.f64 (.f64 1/8 (.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 angle 4)))) (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))))) 2)))) (sqrt.f64 2))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (-.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 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)))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/612220032000000 (/.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) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (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 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2))))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 6) (.f64 b (sqrt.f64 8)))))) (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/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))) (+.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 (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)) (.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 8)))))) (sqrt.f64 2))))))
(fma.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (+.f64 (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 4 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 (.f64 x-scale x-scale) (.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 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) -1/408146688000000)))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (fma.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) (+.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 (.f64 1/2099520000 (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 4))))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2))))) (/.f64 (.f64 1/612220032000000 (pow.f64 (PI.f64) 6)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000)))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (fma.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (fma.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) (+.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 (.f64 1/2099520000 (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 4))))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 angle 6)))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))) (.f64 1/8 (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (.f64 (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/4199040000)))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 angle 4))))))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 x-scale x-scale) (.f64 (.f64 b (.f64 (sqrt.f64 8) (pow.f64 angle 6))) (+.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 4 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/102036672000000) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (/.f64 -1/408146688000000 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 6)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/2 (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 x-scale 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/612220032000000) (pow.f64 (.f64 y-scale x-scale) 2))))))) (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (.f64 x-scale x-scale))))) (.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))))) 2)))) -1/2))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 x-scale (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (.f64 (.f64 angle angle) (.f64 b (sqrt.f64 8))))))) (fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (/.f64 (.f64 1/8 (.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 angle 4)))) (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (*.f64 x-scale x-scale)))))) 2)))) (sqrt.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.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 (.f64 y-scale x-scale) (.f64 b (sqrt.f64 8))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(/.f64 (sqrt.f64 2) x-scale)
(+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2))))
(+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)))))) (sqrt.f64 2))))
(+.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1/2 (/.f64 (sqrt.f64 2) (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (.f64 x-scale (*.f64 angle angle))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2)))))
(fma.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/4199040000)))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)) (pow.f64 angle 4)))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)))))) (sqrt.f64 2)))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))))) 2)) (pow.f64 angle 4))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (/.f64 1/2 (/.f64 (sqrt.f64 2) (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (.f64 x-scale (.f64 angle angle)))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2 (.f64 (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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (.f64 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2))))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2)))))) (sqrt.f64 2))) 2)))) (sqrt.f64 2))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))))))) (sqrt.f64 2))) (.f64 1/2 (/.f64 (.f64 x-scale (.f64 (-.f64 (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 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)))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/612220032000000 (/.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) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/816293376000000 (/.f64 (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 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (.f64 1/16200 (/.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 x-scale 2))))) (-.f64 (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (+.f64 (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (pow.f64 x-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 (.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4))) (+.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 1/2099520000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)))))) (+.f64 (.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (.f64 1/16200 (/.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 y-scale 2))) (*.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2)))))) (sqrt.f64 2))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (pow.f64 angle 6))) (sqrt.f64 2))))))
(fma.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/4199040000)))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)) (pow.f64 angle 4)))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (+.f64 (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 4 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-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 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 (.f64 x-scale x-scale) (.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 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) -1/408146688000000)))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (fma.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) (+.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 (.f64 1/2099520000 (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 4))))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2))))) (/.f64 (.f64 1/612220032000000 (pow.f64 (PI.f64) 6)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000)))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (fma.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) (fma.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (fma.f64 1/6298560000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) (+.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 (.f64 1/2099520000 (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 4))))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) 2)))))))) (pow.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (sqrt.f64 2) (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (sqrt.f64 2) 2)))) (pow.f64 angle 6))) (sqrt.f64 2))))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))))) 2)) (pow.f64 angle 4))) (+.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 angle (.f64 angle (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale))))))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (+.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 4 (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/102036672000000) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (/.f64 -1/408146688000000 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 6)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 (.f64 y-scale x-scale) 2)) (fma.f64 1/2 (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 x-scale 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/612220032000000) (pow.f64 (.f64 y-scale x-scale) 2))))))) (fma.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (fma.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (.f64 x-scale x-scale))))) (.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (.f64 (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))) (-.f64 (+.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale))) (.f64 (.f64 x-scale x-scale) (.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) -1/196830000) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 y-scale y-scale))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/1574640000) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 (.f64 y-scale x-scale) 2)) (pow.f64 (.f64 (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 x-scale x-scale) 1/2)) 2)))) 1/2))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000)) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (fma.f64 1/2 (.f64 x-scale (.f64 x-scale (+.f64 (fma.f64 -1/16200 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 4)) (/.f64 1/8100 (/.f64 (pow.f64 (.f64 y-scale x-scale) 2) (pow.f64 (PI.f64) 2)))) (/.f64 (.f64 -1/16200 (pow.f64 (PI.f64) 2)) (pow.f64 (.f64 y-scale x-scale) 2))))) (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) -1/32400) (.f64 x-scale x-scale)))))) 2)))) -1/2)) (pow.f64 angle 6)))))))
(sqrt.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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 (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 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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 (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 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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 (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 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-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 (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 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1/2)))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-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 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (pow.f64 x-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.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 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 1/2 (/.f64 (.f64 (pow.f64 x-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.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 (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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 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 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 5) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 -1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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)))) 6) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (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 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.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))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (pow.f64 x-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 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 x-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (pow.f64 x-scale 5) (sqrt.f64 2)) (/.f64 (+.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (.f64 (.f64 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2))) (-.f64 (/.f64 1/2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2))) 2)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale))) (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) -1/2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))))
(/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale)))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 6) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-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 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (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 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 6)))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 6)))) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 2))))) (/.f64 (.f64 -1/2 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-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))))) y-scale)))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (pow.f64 (cos.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 2) (sin.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 (cos.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 (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 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 (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 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 4) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.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 (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 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (cos.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 (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 y-scale (+.f64 (pow.f64 (cos.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 (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 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) (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 (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 (sqrt.f64 2) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 x-scale 6) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale))))
(fma.f64 1/2 (/.f64 y-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 x-scale x-scale) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 4)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-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 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-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 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 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 (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 y-scale y-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)) (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 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 x-scale 6)))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 x-scale (.f64 x-scale (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 x-scale 6)))) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 2))))) (/.f64 (.f64 -1/2 (-.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) y-scale)) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) 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 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (.f64 (.f64 y-scale y-scale) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (/.f64 (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 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) y-scale)
(/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (sqrt.f64 2) (sin.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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) (sin.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 y-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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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 1/2 (/.f64 (.f64 (pow.f64 y-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 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 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 2))) (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 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 (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 x-scale 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) (sin.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 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 (sqrt.f64 2) (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 y-scale 5) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 -1/4 (/.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 (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 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 1/2 (.f64 (/.f64 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (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 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 (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 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.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)))))) (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 3) (sqrt.f64 2)) (/.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 5) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 -1/4 (.f64 (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2)))) (/.f64 (.f64 (/.f64 (-.f64 (/.f64 (.f64 1/2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale)))) (.f64 (sqrt.f64 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2)) (/.f64 (pow.f64 (sqrt.f64 2) 2) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (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 x-scale x-scale))))) 1/2) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (.f64 (/.f64 (sqrt.f64 2) y-scale) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))))
(/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 4))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 y-scale y-scale)))) (.f64 (/.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 2))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.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 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 6) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 6)))) (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 4))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 y-scale y-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (.f64 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 y-scale 6)))) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))))))))))
(/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) x-scale)
(/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (.f64 1/2 (/.f64 x-scale (sqrt.f64 2))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 4))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))) 2)))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 y-scale y-scale)))) (.f64 (/.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))) 2))))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (+.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.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 (sin.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 (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 (pow.f64 x-scale 2) (.f64 (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 (sin.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 (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 y-scale 6) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 x-scale (-.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (sin.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 (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 x-scale (+.f64 (pow.f64 (sin.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 (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 y-scale 4) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (-.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 6)))) (/.f64 x-scale (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 y-scale 4))) (-.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) 2))))))))
(+.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (fma.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 y-scale y-scale)))) (.f64 1/2 (+.f64 (.f64 (/.f64 x-scale (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 y-scale 4)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))) (.f64 (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 2) (pow.f64 y-scale 6)))) (+.f64 (.f64 -1/4 (/.f64 (pow.f64 x-scale 6) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2))))) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (sqrt.f64 2) 2)) (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)))) (-.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2)) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) 2))))))))))
(pow.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale))))))) 1)
(.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale)))))
(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))
(log.f64 (exp.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale)))))
(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))
(cbrt.f64 (.f64 (.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-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 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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(cbrt.f64 (.f64 (.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale))))) (.f64 (.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale))))) (.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale))))))))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale x-scale) 2) (.f64 (.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8))))) (.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))))))
(expm1.f64 (log1p.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale)))))
(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))
(exp.f64 (log.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale)))))
(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))
(log1p.f64 (expm1.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (neg.f64 (/.f64 b (/.f64 x-scale (/.f64 (sqrt.f64 8) y-scale)))))))))
(.f64 (pow.f64 (.f64 y-scale x-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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 (neg.f64 b) (*.f64 (/.f64 x-scale (sqrt.f64 8)) y-scale)))))
(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale))))) (/.f64 (neg.f64 b) (/.f64 (.f64 y-scale x-scale) (sqrt.f64 8)))) (.f64 -1/4 (pow.f64 (*.f64 y-scale x-scale) 2)))
(.f64 1 (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(.f64 (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (sqrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(.f64 (.f64 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(pow.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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)
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(pow.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) 1)
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(log.f64 (exp.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(cbrt.f64 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (.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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (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 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(cbrt.f64 (.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 x-scale x-scale)))))))
(expm1.f64 (log1p.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(exp.f64 (log.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))
(log1p.f64 (expm1.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))
(sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (.f64 y-scale x-scale) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 x-scale x-scale)))))

eval1.5s (1.4%)

Compiler: Compiled 88591 to 60118 computations (32.1% saved)

prune555.0ms (0.5%)

Pruning

133 alts after pruning (132 fresh and 1 done)

	Pruned	Kept	Total
New	764	109	873
Fresh	25	23	48
Picked	1	0	1
Done	3	1	4
Total	793	133	926

Accurracy

54.0%

Counts

926 → 133

Alt Table

Click to see full alt table

Status	Accuracy	Program
	16.5%	(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
	6.9%	(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
	7.8%	(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	3.1%	(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))))) (.f64 b (sqrt.f64 2))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) b))))
	1.7%	(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
	10.7%	(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))) (/.f64 b y-scale))) (.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8))))
	6.9%	(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
	0.3%	(/.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)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (/.f64 (.f64 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	1.9%	(/.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)) (+.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 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	2.9%	(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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)))))
	12.2%	(+.f64 (.f64 -1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))))
	6.1%	(+.f64 (.f64 -1/8 (/.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/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
	3.9%	(.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)))))
	4.5%	(.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))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (.f64 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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 1 2) (.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)))))
	3.5%	(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.1%	(.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)))
	7.5%	(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
	12.6%	(.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))
	16.2%	(.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
	10.3%	(.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
	6.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
	4.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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)))))
	4.9%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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))))
	4.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))))
	4.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
	11.5%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
	6.1%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
	11.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
	5.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) a))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.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))))))))))
	3.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale)))))
	6.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
	2.4%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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))))))))))
	4.5%	(.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)))))))
	4.9%	(.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 angle (.f64 1/180 (PI.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.9%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
	9.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
	6.8%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
	4.5%	(.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)))))))
	10.4%	(.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
	10.3%	(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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))))))
	4.7%	(.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)))))))
▶	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3))
	17.9%	(.f64 (.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))) 3))
	8.0%	(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))))) 1))
	8.1%	(.f64 (.f64 1/4 y-scale) (.f64 (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) b))) 1) (sqrt.f64 2)))
✓	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
	17.9%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
	9.5%	(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
	14.0%	(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
	9.5%	(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
	3.1%	(.f64 (.f64 1/4 y-scale) (log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))))))
	8.3%	(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))))))
	4.0%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) x-scale))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.9%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
▶	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.9%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.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)))))))
	6.5%	(.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)))))))
	4.7%	(.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.6%	(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
	11.6%	(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
	8.1%	(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
	16.8%	(.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
	7.1%	(.f64 1/4 (pow.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64) 1/3))
	17.5%	(.f64 1/4 (pow.f64 (sqrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
	18.0%	(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
	8.4%	(.f64 1/4 (/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)))
▶	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
	12.9%	(.f64 1/4 (-.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
	16.6%	(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
	6.2%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
	4.9%	(.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))))))))
	17.9%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	7.4%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	7.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	13.3%	(.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)))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 3)))
	12.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
	5.2%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 b)) 3))))
	9.4%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (sqrt.f64 8))))))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
	9.5%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
	3.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
	8.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
	27.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
	17.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	16.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	3.5%	(.f64 1/4 (.f64 y-scale (.f64 (.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)))))))))
	5.0%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	4.6%	(.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	10.3%	(.f64 1/4 (.f64 y-scale (.f64 (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))))))))
	7.4%	(.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)))))))))
	13.4%	(.f64 1/4 (.f64 x-scale (.f64 (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))))))))
	6.4%	(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
▶	18.2%	(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
	3.5%	(.f64 1/4 (log.f64 (exp.f64 (.f64 4 (*.f64 y-scale b)))))
▶	28.0%	(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
	17.3%	(.f64 1/4 (expm1.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
	16.4%	(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
	7.6%	(.f64 1/4 (cbrt.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
	7.3%	(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
	12.1%	(.f64 -1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
	6.5%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
	12.0%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	12.6%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	5.7%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	12.6%	(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
	6.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	8.1%	(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
	3.5%	(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
	6.6%	(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))

Compiler

Compiled 12564 to 9410 computations (25.1% saved)

localize15.0ms (0%)

Local Accuracy

Found 1 expressions with local accuracy:

New	Accuracy	Program
✓	100.0%	(.f64 4 (.f64 y-scale b))

Compiler

Compiled 31 to 18 computations (41.9% saved)

series3.0ms (0%)

Counts

1 → 0

Calls

6 calls:

Time	Variable		Point	Expression
1.0ms	y-scale	@	inf	(.f64 4 (.f64 y-scale b))
1.0ms	b	@	0	(.f64 4 (.f64 y-scale b))
1.0ms	y-scale	@	0	(.f64 4 (.f64 y-scale b))
1.0ms	b	@	inf	(.f64 4 (.f64 y-scale b))
0.0ms	b	@	-inf	(.f64 4 (.f64 y-scale b))

rewrite61.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1312×	`add-sqr-sqrt`
1298×	`*-un-lft-identity`
1208×	`add-cube-cbrt`
1192×	`add-cbrt-cube`
1178×	`add-exp-log`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	7	13
1	142	13
2	1634	13

Stop Event

1×	node limit

Counts

1 → 11

Calls

Call 1

Inputs
(.f64 4 (.f64 y-scale b))

Outputs

(((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((pow.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((pow.f64 (*.f64 (sqrt.f64 (*.f64 y-scale 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>) ((*.f64 4 (*.f64 y-scale b))) #f)) ((pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((pow.f64 (pow.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((sqrt.f64 (pow.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) 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 4 (*.f64 y-scale b))) #f)) ((cbrt.f64 (pow.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((expm1.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((exp.f64 (log.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)) ((log1p.f64 (expm1.f64 (*.f64 4 (*.f64 y-scale 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 4 (*.f64 y-scale b))) #f)))

simplify55.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1250×	`log-prod`
1040×	`distribute-rgt-in`
1014×	`distribute-lft-in`
786×	`associate-+r+`
770×	`associate-r`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	35	275
1	89	209
2	325	143
3	1926	143
4	7928	143

Stop Event

1×	node limit

Counts

11 → 14

Calls

Call 1

Inputs
(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(pow.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 2)
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(pow.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) 4))
(cbrt.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 3))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))

Outputs
(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(pow.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 2)
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(pow.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 3) 1/3)
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(sqrt.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) 4))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(cbrt.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 3))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 1 (-.f64 (.f64 4 (.f64 y-scale b)) 1))
(+.f64 (.f64 b (.f64 4 y-scale)) 0)
(.f64 4 (.f64 y-scale b))

localize11.0ms (0%)

Local Accuracy

Found 1 expressions with local accuracy:

New	Accuracy	Program
	100.0%	(.f64 4 (.f64 y-scale b))

Compiler

Compiled 24 to 14 computations (41.7% saved)

localize40.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))
✓	99.3%	(*.f64 b (sqrt.f64 2))
✓	44.7%	(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3)

Compiler

Compiled 65 to 56 computations (13.8% saved)

series7.0ms (0%)

Counts

3 → 36

Calls

9 calls:

Time	Variable		Point	Expression
3.0ms	b	@	0	(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3)
2.0ms	b	@	-inf	(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3)
1.0ms	b	@	inf	(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3)
0.0ms	b	@	inf	(*.f64 b (sqrt.f64 2))
0.0ms	b	@	0	(*.f64 b (sqrt.f64 2))

rewrite114.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

960×	`*-commutative`
930×	`unswap-sqr`
924×	`sqrt-prod`
618×	`swap-sqr`
446×	`sqr-pow`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	14	53
1	300	53
2	2997	25

Stop Event

1×	node limit

Counts

3 → 85

Calls

Call 1

Inputs
(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) 3) 1/3)
(*.f64 b (sqrt.f64 2))
(.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))

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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 2 (*.f64 (sqrt.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 b 4) (*.f64 (pow.f64 1 1/6) (pow.f64 1 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 2 (sqrt.f64 b)) (*.f64 2 (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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 8 1/4) (sqrt.f64 (*.f64 (*.f64 b (sqrt.f64 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) (sqrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 b (sqrt.f64 2))) (sqrt.f64 (*.f64 (sqrt.f64 8) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (cbrt.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 2 1/6) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (*.f64 b 4) 1/4) (pow.f64 (*.f64 b 4) 3/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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (pow.f64 (*.f64 b 4) 3/4) (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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (sqrt.f64 2) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 8 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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)) (pow.f64 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) b)) (sqrt.f64 (*.f64 (sqrt.f64 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (*.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (*.f64 b (sqrt.f64 2)) (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 b 4))) (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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (*.f64 b 4) (cbrt.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((*.f64 (sqrt.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 2 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) (pow.f64 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((log.f64 (pow.f64 (exp.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((cbrt.f64 (*.f64 (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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 2 (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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (pow.f64 (*.f64 b 4) 3/2) 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((pow.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)) ((sqrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #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>) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2))) 3) 1/3) (*.f64 b (sqrt.f64 2)) (*.f64 (sqrt.f64 8) (*.f64 b (sqrt.f64 2)))) #f)))

simplify85.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1458×	`associate-/l*`
1254×	`unswap-sqr`
1130×	`associate-/r*`
1042×	`*-commutative`
436×	`distribute-lft-in`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	177	4294969679
1	430	2389
2	1585	2371
3	5307	2371

Stop Event

1×	node limit

Counts

121 → 107

Calls

Call 1

Inputs
(.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 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(*.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 (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 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))
(*.f64 b 4)
(.f64 2 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 2))))
(.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) b))
(.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))
(.f64 (.f64 b 4) 1)
(.f64 (.f64 b 4) (*.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)))
(.f64 1 (.f64 b 4))
(.f64 (.f64 2 (sqrt.f64 b)) (*.f64 2 (sqrt.f64 b)))
(.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 (pow.f64 8 1/4) (sqrt.f64 (.f64 (.f64 b (sqrt.f64 2)) (.f64 b 4))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 2))) (sqrt.f64 (.f64 8 (.f64 b (sqrt.f64 2)))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 2))) (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4)))))
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (pow.f64 2 1/6) (.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)))
(.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 4 b)
(.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2))
(.f64 (pow.f64 (.f64 b 4) 1/4) (pow.f64 (*.f64 b 4) 3/4))
(.f64 (pow.f64 (.f64 b 4) 3/4) (pow.f64 (*.f64 b 4) 1/4))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 2))) 2)
(.f64 (sqrt.f64 (.f64 8 (.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 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(.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)) (pow.f64 2 1/6))
(.f64 (.f64 (sqrt.f64 8) (cbrt.f64 (.f64 b (sqrt.f64 2)))) (cbrt.f64 (.f64 2 (*.f64 b b))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 8) b)) (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b 4))))
(.f64 (.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (*.f64 b 4))
(.f64 (sqrt.f64 (.f64 (.f64 b (sqrt.f64 2)) (.f64 b 4))) (pow.f64 8 1/4))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))) (sqrt.f64 (.f64 b (sqrt.f64 2))))
(.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6))
(.f64 (sqrt.f64 (.f64 (.f64 b 4) (.f64 (sqrt.f64 8) b))) (pow.f64 2 1/4))
(/.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))))
(sqrt.f64 (.f64 (.f64 b b) 16))
(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 (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 (.f64 2 (.f64 b b)) 1/2)
(pow.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)
(sqrt.f64 (.f64 2 (.f64 b b)))
(fabs.f64 (*.f64 b (sqrt.f64 2)))
(log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 2)))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 2)))))
(cbrt.f64 (*.f64 (sqrt.f64 8) (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 b 4))) -1)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(/.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 (pow.f64 (*.f64 b 4) 3) 1/3)
(pow.f64 (*.f64 b 4) 1)
(pow.f64 (*.f64 2 (sqrt.f64 b)) 2)
(pow.f64 (pow.f64 (*.f64 b 4) 3/2) 2/3)
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6)
(pow.f64 (.f64 (.f64 b b) 16) 1/2)
(sqrt.f64 (.f64 (.f64 b b) 16))
(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)))

Outputs
(.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 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(neg.f64 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (neg.f64 (sqrt.f64 2)) (*.f64 b (cbrt.f64 -1))) (sqrt.f64 8))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (neg.f64 (cbrt.f64 -1)))
(.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 (neg.f64 b) (cbrt.f64 -1))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(neg.f64 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (neg.f64 (sqrt.f64 2)) (*.f64 b (cbrt.f64 -1))) (sqrt.f64 8))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (neg.f64 (cbrt.f64 -1)))
(.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 (neg.f64 b) (cbrt.f64 -1))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(neg.f64 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (neg.f64 (sqrt.f64 2)) (*.f64 b (cbrt.f64 -1))) (sqrt.f64 8))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (neg.f64 (cbrt.f64 -1)))
(.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 (neg.f64 b) (cbrt.f64 -1))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (.f64 b (sqrt.f64 8)))))
(neg.f64 (.f64 (sqrt.f64 2) (.f64 (cbrt.f64 -1) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (neg.f64 (sqrt.f64 2)) (*.f64 b (cbrt.f64 -1))) (sqrt.f64 8))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 8))) (neg.f64 (cbrt.f64 -1)))
(.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 (neg.f64 b) (cbrt.f64 -1))))
(*.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 (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 (exp.f64 (log1p.f64 (*.f64 b 4))) -1)
(*.f64 b 4)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 b 4)
(.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 4)
(.f64 2 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 2))))
(*.f64 b 4)
(.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 4) 1)
(*.f64 b 4)
(.f64 (.f64 b 4) (*.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)))
(*.f64 b 4)
(.f64 1 (.f64 b 4))
(*.f64 b 4)
(.f64 (.f64 2 (sqrt.f64 b)) (*.f64 2 (sqrt.f64 b)))
(*.f64 b 4)
(.f64 (pow.f64 2 1/4) (.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)))
(.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))
(.f64 (pow.f64 8 1/4) (.f64 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)))
(.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))
(.f64 (pow.f64 8 1/4) (sqrt.f64 (.f64 (.f64 b (sqrt.f64 2)) (.f64 b 4))))
(.f64 (pow.f64 8 1/4) (sqrt.f64 (.f64 b (.f64 (sqrt.f64 2) (.f64 b 4)))))
(.f64 (pow.f64 8 1/4) (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b (.f64 b 4)))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 2))) (sqrt.f64 (.f64 8 (.f64 b (sqrt.f64 2)))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) b)) (sqrt.f64 (.f64 (.f64 8 b) (sqrt.f64 2))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b 8))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 2))) (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) b)) (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))))
(.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) 4))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4)))))
(*.f64 b 4)
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (pow.f64 2 1/6) (.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)))
(.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2)))
(.f64 (.f64 b (sqrt.f64 8)) (*.f64 (pow.f64 2 1/6) (cbrt.f64 2)))
(.f64 b (.f64 (sqrt.f64 8) (*.f64 (pow.f64 2 1/6) (cbrt.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 (cbrt.f64 (.f64 2 (.f64 b b))) (.f64 (sqrt.f64 8) (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 (cbrt.f64 (.f64 2 (.f64 b b))) (.f64 (sqrt.f64 8) (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 4 b)
(*.f64 b 4)
(.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 (pow.f64 (.f64 b 4) 1/4) (pow.f64 (*.f64 b 4) 3/4))
(.f64 (pow.f64 (.f64 b 4) 3/4) (pow.f64 (*.f64 b 4) 1/4))
(.f64 (pow.f64 (.f64 b 4) 1/4) (pow.f64 (*.f64 b 4) 3/4))
(.f64 (.f64 (sqrt.f64 2) (*.f64 b (sqrt.f64 2))) 2)
(*.f64 b 4)
(.f64 (sqrt.f64 (.f64 8 (.f64 b (sqrt.f64 2)))) (sqrt.f64 (.f64 b (sqrt.f64 2))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) b)) (sqrt.f64 (.f64 (.f64 8 b) (sqrt.f64 2))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b 8))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.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 (cbrt.f64 (.f64 2 (.f64 b b))) (.f64 (sqrt.f64 8) (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 (*.f64 b (sqrt.f64 2)) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (pow.f64 2 1/4) (*.f64 (sqrt.f64 8) b)) (pow.f64 2 1/4))
(.f64 b (.f64 (sqrt.f64 2) (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (cbrt.f64 2) (*.f64 (sqrt.f64 8) b)) (pow.f64 2 1/6))
(.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2)))
(.f64 (.f64 b (sqrt.f64 8)) (*.f64 (pow.f64 2 1/6) (cbrt.f64 2)))
(.f64 b (.f64 (sqrt.f64 8) (*.f64 (pow.f64 2 1/6) (cbrt.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 (cbrt.f64 (.f64 2 (.f64 b b))) (.f64 (sqrt.f64 8) (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 (sqrt.f64 (.f64 (sqrt.f64 8) b)) (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b 4))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b 4))))
(.f64 (.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (*.f64 b 4))
(*.f64 b 4)
(.f64 (sqrt.f64 (.f64 (.f64 b (sqrt.f64 2)) (.f64 b 4))) (pow.f64 8 1/4))
(.f64 (pow.f64 8 1/4) (sqrt.f64 (.f64 b (.f64 (sqrt.f64 2) (.f64 b 4)))))
(.f64 (pow.f64 8 1/4) (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 b (.f64 b 4)))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))) (sqrt.f64 (.f64 b (sqrt.f64 2))))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 2) b)) (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))))
(.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) 4))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 b 4))) (sqrt.f64 (.f64 (sqrt.f64 2) b)))
(.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6))
(.f64 (sqrt.f64 (.f64 b (.f64 4 (cbrt.f64 (.f64 (.f64 b b) 16))))) (pow.f64 (.f64 b 4) 1/6))
(.f64 (sqrt.f64 (.f64 (.f64 b 4) (.f64 (sqrt.f64 8) b))) (pow.f64 2 1/4))
(.f64 (pow.f64 2 1/4) (sqrt.f64 (.f64 (.f64 (sqrt.f64 8) (.f64 b 4)) b)))
(.f64 (pow.f64 2 1/4) (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 (.f64 b 4) b))))
(.f64 (pow.f64 2 1/4) (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (.f64 b 4)))))
(/.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 b 4)
(/.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 b 4))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 b 4))) 3)) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (exp.f64 (.f64 2 (log1p.f64 (.f64 b 4)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4))))))
(sqrt.f64 (.f64 (.f64 b b) 16))
(*.f64 b 4)
(fabs.f64 (*.f64 b 4))
(*.f64 b 4)
(log.f64 (exp.f64 (*.f64 b 4)))
(*.f64 b 4)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(*.f64 b 4)
(cbrt.f64 (pow.f64 (*.f64 b 4) 3))
(*.f64 b 4)
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(*.f64 b 4)
(exp.f64 (log.f64 (*.f64 b 4)))
(*.f64 b 4)
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(*.f64 b 4)
(+.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) (+.f64 (exp.f64 (+.f64 (log1p.f64 (.f64 (sqrt.f64 2) b)) (log1p.f64 (.f64 (sqrt.f64 2) b)))) (+.f64 1 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) b))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) b))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) b))) (exp.f64 (.f64 2 (log1p.f64 (.f64 (sqrt.f64 2) b)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 (sqrt.f64 2) b)))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) b))) (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 (.f64 2 (.f64 b b)) 1/2)
(sqrt.f64 (.f64 2 (.f64 b b)))
(pow.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)
(cbrt.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)))
(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 b) (sqrt.f64 2)))
(*.f64 (sqrt.f64 2) b)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b (sqrt.f64 2)))))
(*.f64 (sqrt.f64 2) b)
(cbrt.f64 (*.f64 (sqrt.f64 8) (pow.f64 b 3)))
(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 b 4))) -1)
(*.f64 b 4)
(-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1)
(*.f64 b 4)
(/.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 b 4)
(/.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 b 4))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 b 4))) 3)) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (exp.f64 (.f64 2 (log1p.f64 (.f64 b 4)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4))))))
(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
(*.f64 b 4)
(pow.f64 (*.f64 b 4) 1)
(*.f64 b 4)
(pow.f64 (*.f64 2 (sqrt.f64 b)) 2)
(*.f64 b 4)
(pow.f64 (pow.f64 (*.f64 b 4) 3/2) 2/3)
(.f64 (cbrt.f64 (pow.f64 (.f64 b 4) 3/2)) (cbrt.f64 (pow.f64 (*.f64 b 4) 3/2)))
(pow.f64 (cbrt.f64 (*.f64 b 4)) 3)
(*.f64 b 4)
(pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6)
(pow.f64 (*.f64 (pow.f64 b 6) 4096) 1/6)
(pow.f64 (.f64 (.f64 b b) 16) 1/2)
(*.f64 b 4)
(sqrt.f64 (.f64 (.f64 b b) 16))
(*.f64 b 4)
(fabs.f64 (*.f64 b 4))
(*.f64 b 4)
(log.f64 (exp.f64 (*.f64 b 4)))
(*.f64 b 4)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 b 4))))
(*.f64 b 4)
(cbrt.f64 (pow.f64 (*.f64 b 4) 3))
(*.f64 b 4)
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(*.f64 b 4)
(exp.f64 (log.f64 (*.f64 b 4)))
(*.f64 b 4)
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(*.f64 b 4)

localize69.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
✓	99.0%	(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
✓	98.4%	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
✓	88.1%	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))

Compiler

Compiled 151 to 102 computations (32.5% saved)

series105.0ms (0.1%)

Counts

4 → 96

Calls

24 calls:

Time	Variable		Point	Expression
12.0ms	y-scale	@	inf	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
12.0ms	b	@	inf	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
12.0ms	b	@	-inf	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
11.0ms	y-scale	@	-inf	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))
9.0ms	y-scale	@	-inf	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))

rewrite166.0ms (0.2%)

Algorithm

1×	batch-egg-rewrite

Rules

1572×	`associate-*l/`
1022×	`associate-/r*`
408×	`add-sqr-sqrt`
398×	`*-un-lft-identity`
394×	`pow1`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	20	166
1	413	162
2	5162	156

Stop Event

1×	node limit

Counts

4 → 106

Calls

Call 1

Inputs
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))
(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))

Outputs
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 1 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 -1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 2))) (-.f64 (.f64 y-scale (.f64 b 4)) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 3))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((neg.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (neg.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (exp.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) #f)))
(((+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((+.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((+.f64 1 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 1 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (sqrt.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 2) (cbrt.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) (-.f64 1 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) 1) (-.f64 1 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)) (cbrt.f64 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((sqrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (exp.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((cbrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((expm1.f64 (log.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) #f)))
(((+.f64 1 (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (exp.f64 (log.f64 (+.f64 2 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (/.f64 1 (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (/.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 1 (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (exp.f64 4)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (cbrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (exp.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((cbrt.f64 (pow.f64 (exp.f64 2) (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (.f64 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (.f64 (.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)))
(((+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((+.f64 -1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 1 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 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 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((pow.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((sqrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (exp.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((cbrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((exp.f64 (.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) #f)) ((log1p.f64 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.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>) ((/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) #f)))

simplify272.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1504×	`associate-r`
1476×	`associate-l`
1162×	`+-commutative`
1006×	`associate-/r*`
710×	`associate-+r+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	906	37904
1	3038	37396

Stop Event

1×	node limit

Counts

202 → 338

Calls

Call 1

Inputs
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b)))))
(+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))))
(+.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))))) (+.f64 (.f64 4/3 (.f64 b (+.f64 (.f64 64/3 (pow.f64 b 3)) (+.f64 (.f64 32/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 -128 (pow.f64 b 3)) (.f64 128/3 (pow.f64 b 3))))))))) (.f64 1/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))) (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))))) b)))))))))) (+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b)))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))) 2)))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 3)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2)))))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))))) (pow.f64 y-scale 3)))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))))
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b)))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b))))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4))))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (+.f64 (.f64 4/3 (.f64 y-scale (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 64/3 (pow.f64 y-scale 3)) (+.f64 (.f64 128/3 (pow.f64 y-scale 3)) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (+.f64 (.f64 -128 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3))))))))) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (+.f64 (.f64 8 y-scale) (*.f64 4 y-scale)))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))) (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 y-scale 3)))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 y-scale 2)))))) (pow.f64 b 3))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))))
1
(+.f64 1 (.f64 4 (.f64 y-scale b)))
(+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 8 (pow.f64 b 2)) (*.f64 -8 (pow.f64 b 2))))))
(+.f64 (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 64/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (.f64 32/3 (pow.f64 b 3))))) (+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 8 (pow.f64 b 2)) (*.f64 -8 (pow.f64 b 2)))))))
(exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
1
(+.f64 1 (.f64 4 (.f64 y-scale b)))
(+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 2) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (*.f64 -8 (pow.f64 y-scale 2))))))
(+.f64 (.f64 (+.f64 (.f64 64/3 (pow.f64 y-scale 3)) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 2) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (*.f64 -8 (pow.f64 y-scale 2)))))))
(exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
1
(+.f64 1 (.f64 8 (.f64 y-scale b)))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -16 (pow.f64 b 2)) (.f64 32 (pow.f64 b 2)))) (+.f64 1 (.f64 8 (*.f64 y-scale b))))
(+.f64 (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 128/3 (pow.f64 b 3)) (.f64 -128 (pow.f64 b 3))))) (+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -16 (pow.f64 b 2)) (.f64 32 (pow.f64 b 2)))) (+.f64 1 (.f64 8 (*.f64 y-scale b)))))
(exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (*.f64 y-scale b)))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (*.f64 y-scale b)))))
(exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 y-scale b)))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 y-scale b)))))
1
(+.f64 1 (.f64 8 (.f64 y-scale b)))
(+.f64 1 (+.f64 (.f64 8 (.f64 y-scale b)) (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (*.f64 32 (pow.f64 y-scale 2))) (pow.f64 b 2))))
(+.f64 1 (+.f64 (.f64 8 (.f64 y-scale b)) (+.f64 (.f64 (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 128/3 (pow.f64 y-scale 3)) (.f64 -128 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (*.f64 32 (pow.f64 y-scale 2))) (pow.f64 b 2)))))
(exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (*.f64 y-scale b)))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (*.f64 y-scale b)))))
(.f64 12 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 12 (*.f64 y-scale b)))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (*.f64 64 (pow.f64 b 3)))))))
(+.f64 (.f64 (pow.f64 y-scale 4) (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (*.f64 64 (pow.f64 b 3))))))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))) 1)
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 1)
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))))) 1)
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))) 1)
(-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 1)
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) 1)
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) 1)
(.f64 12 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 12 (*.f64 y-scale b)))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (+.f64 (.f64 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 12 (*.f64 y-scale b))))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (+.f64 (.f64 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4)))))) (pow.f64 b 4)) (+.f64 (.f64 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 12 (*.f64 y-scale b)))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))) 1)
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b)))) 1)
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) 1)
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))) 1)
(-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))) 1)
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) 1)
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))))) 1)
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (+.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))) 1)
(-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(.f64 1 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 1)
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 -1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(.f64 (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 2))) (-.f64 (.f64 y-scale (.f64 b 4)) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 3))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (.f64 y-scale (*.f64 b 4))))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 1)
(pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))) 2)
(pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))) 3)
(pow.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 3) 1/3)
(pow.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) -1)
(neg.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (neg.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 2))
(log.f64 (exp.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))))
(cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 3))
(expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(exp.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(exp.f64 (.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) 1))
(log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(+.f64 (.f64 y-scale (.f64 b 4)) 1)
(+.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 0)
(+.f64 1 (.f64 y-scale (.f64 b 4)))
(-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 0)
(-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 2) 1)
(.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 1)
(.f64 1 (+.f64 (.f64 y-scale (*.f64 b 4)) 1))
(.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (sqrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)))
(.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)) 2))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 2) (cbrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)))
(/.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) (-.f64 1 (.f64 y-scale (.f64 b 4))))
(/.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (.f64 b 4)))))
(/.f64 (.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) 1) (-.f64 1 (.f64 y-scale (*.f64 b 4))))
(/.f64 (.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (*.f64 b 4)))))
(pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 1)
(pow.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 2)
(pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 3)
(pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.f64 b 4))))
(pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3)
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)) (cbrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(sqrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2))
(log.f64 (exp.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1))))
(cbrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3))
(expm1.f64 (log.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 2)))
(log1p.f64 (expm1.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)))
(+.f64 1 (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 1))
(+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 0)
(-.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 1)
(-.f64 (exp.f64 (log.f64 (+.f64 2 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))) 2)
(-.f64 (/.f64 1 (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (/.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1))
(.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))) 1)
(.f64 (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(.f64 (pow.f64 1 (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(.f64 (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(.f64 (pow.f64 (cbrt.f64 (exp.f64 4)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (cbrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(log.f64 (exp.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))))
(cbrt.f64 (pow.f64 (exp.f64 2) (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(expm1.f64 (log1p.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 2))
(exp.f64 (.f64 (.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))) 2) 1))
(log1p.f64 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) -1)
(+.f64 -1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3))
(-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1)
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) 1)
(.f64 1 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 2))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 3)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1)))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 3) 1)))
(pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 1)
(pow.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 2)
(pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 3)
(pow.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 3) 1/3)
(sqrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 2))
(log.f64 (exp.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))))))
(cbrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 3))
(exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(exp.f64 (.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1))
(log1p.f64 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))

Outputs
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b)))))
(fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))
(fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))
(+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))))
(fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (*.f64 b 12)))))))
(fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
(+.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))))) (+.f64 (.f64 4/3 (.f64 b (+.f64 (.f64 64/3 (pow.f64 b 3)) (+.f64 (.f64 32/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 -128 (pow.f64 b 3)) (.f64 128/3 (pow.f64 b 3))))))))) (.f64 1/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))) (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))))) b)))))))))) (+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b)))))))
(fma.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (fma.f64 -192 (pow.f64 b 4) (fma.f64 864 (pow.f64 b 4) (fma.f64 768 (pow.f64 b 4) (.f64 (pow.f64 b 4) -1440))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (fma.f64 4/3 (.f64 b (fma.f64 64/3 (pow.f64 b 3) (+.f64 (.f64 (pow.f64 b 3) -64/3) (fma.f64 256/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -256/3))))) (.f64 1/3 (.f64 (.f64 b 12) (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 b 3) (.f64 (pow.f64 b 3) -224))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0))))))))))) (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
(fma.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (fma.f64 -192 (pow.f64 b 4) (fma.f64 864 (pow.f64 b 4) (fma.f64 768 (pow.f64 b 4) (.f64 (pow.f64 b 4) -1440))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (fma.f64 4/3 (.f64 b (+.f64 (fma.f64 64/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -64/3)) (fma.f64 256/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -256/3)))) (.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3)))))))))) (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))
(/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))))))))
(+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (-.f64 (-.f64 (/.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2)))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (fma.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (fma.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b))))) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (.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 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))) 2)))))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))))))) (+.f64 (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (+.f64 (/.f64 (-.f64 (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b b)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (/.f64 (.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b b)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))))) (/.f64 (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))))) (.f64 1/16 (+.f64 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))))))))))
(-.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (fma.f64 1/64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) y-scale) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (+.f64 (.f64 (/.f64 (-.f64 (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b b)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (/.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))))))))) (/.f64 (/.f64 (.f64 (.f64 1/16 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 b b)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2))) (pow.f64 y-scale 3)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 1/16 (+.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b))))) (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))))) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) 2) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b)))))) (.f64 b (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))))))))
(-.f64 (+.f64 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale)) (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (/.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 b b)) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 3)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2)))))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))))) (pow.f64 y-scale 3)))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (pow.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale) (+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))) (neg.f64 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (pow.f64 b 3) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 b b))) (+.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (/.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))))) (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))))) (/.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (.f64 b b)))))) (pow.f64 y-scale 3))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))))))))
(-.f64 (+.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale) (fma.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (neg.f64 (/.f64 (-.f64 (/.f64 (/.f64 (.f64 -1/64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 b 3)) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (+.f64 (/.f64 (-.f64 (-.f64 (.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b) b)) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (/.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (/.f64 (/.f64 (.f64 1/16 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (.f64 b b)) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (.f64 b b)))))) (pow.f64 y-scale 3)))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (/.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 b b)) (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))))
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b)))
(fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b)))
(fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b))))
(fma.f64 (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4))))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (+.f64 (.f64 4/3 (.f64 y-scale (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 64/3 (pow.f64 y-scale 3)) (+.f64 (.f64 128/3 (pow.f64 y-scale 3)) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (+.f64 (.f64 -128 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3))))))))) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (+.f64 (.f64 8 y-scale) (*.f64 4 y-scale)))))))))))
(fma.f64 (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (fma.f64 4 (.f64 y-scale b) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/3 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24)))) (fma.f64 4/3 (.f64 y-scale (fma.f64 256/3 (pow.f64 y-scale 3) (fma.f64 64/3 (pow.f64 y-scale 3) (fma.f64 128/3 (pow.f64 y-scale 3) (fma.f64 32/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -160)))))) (.f64 1/3 (.f64 (.f64 y-scale 12) (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (*.f64 y-scale y-scale) 24))))))))))))))))
(fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (fma.f64 4 (.f64 y-scale b) (.f64 (pow.f64 b 4) (-.f64 (.f64 1/3 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16)))) (fma.f64 4/3 (.f64 y-scale (fma.f64 256/3 (pow.f64 y-scale 3) (fma.f64 64/3 (pow.f64 y-scale 3) (fma.f64 128/3 (pow.f64 y-scale 3) (fma.f64 32/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -160)))))) (.f64 1/3 (.f64 (.f64 y-scale 12) (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (*.f64 y-scale 16))))))))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))
(/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))
(-.f64 (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))))
(+.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)))) (+.f64 (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (.f64 b b)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)))))))
(-.f64 (fma.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))))) (fma.f64 1/16 (/.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (+.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2)))) (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) 2))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))))))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)))) (+.f64 (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (.f64 b b)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (.f64 b (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (+.f64 (.f64 (/.f64 (-.f64 (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (fma.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))))))) (pow.f64 b 3)) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (.f64 1/16 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 b 3)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))))))))
(-.f64 (fma.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (+.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))))))) (fma.f64 1/16 (/.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2)) (+.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))))) (+.f64 (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (.f64 1/16 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (/.f64 (-.f64 (/.f64 (/.f64 (.f64 3/16 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) 2))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))))))) (/.f64 (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))) (fma.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))
(/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))
(/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))) (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) (*.f64 b b))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 (.f64 b b) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) b)) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 y-scale 3)))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 y-scale 2)))))) (pow.f64 b 3))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))))) (+.f64 (/.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))))))) (.f64 (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (pow.f64 b 2))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b) (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (pow.f64 y-scale 3) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (+.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) (+.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))))))) (.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))))))) (pow.f64 b 3)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) (*.f64 b b))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) b) (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (+.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (-.f64 (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (+.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (/.f64 (/.f64 (.f64 (.f64 1/16 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (.f64 y-scale y-scale)) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) (.f64 y-scale y-scale)))))) (pow.f64 b 3)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 (.f64 b b) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (.f64 b b) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (-.f64 (/.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale)) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale))) (/.f64 (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))))))))))
1
(+.f64 1 (.f64 4 (.f64 y-scale b)))
(fma.f64 y-scale (*.f64 4 b) 1)
(+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 8 (pow.f64 b 2)) (*.f64 -8 (pow.f64 b 2))))))
(+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (.f64 (*.f64 b b) 0))))
(+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 b (.f64 b (.f64 y-scale (*.f64 y-scale 0))))))
(+.f64 (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 64/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (.f64 32/3 (pow.f64 b 3))))) (+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 8 (pow.f64 b 2)) (*.f64 -8 (pow.f64 b 2)))))))
(fma.f64 (pow.f64 y-scale 3) (fma.f64 64/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -64/3)) (+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 0)))))
(fma.f64 (pow.f64 y-scale 3) (fma.f64 64/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -64/3)) (+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 b (.f64 b (.f64 y-scale (.f64 y-scale 0)))))))
(exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))
(exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))
(exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
1
(+.f64 1 (.f64 4 (.f64 y-scale b)))
(fma.f64 y-scale (*.f64 4 b) 1)
(+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 2) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (*.f64 -8 (pow.f64 y-scale 2))))))
(+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (.f64 (*.f64 b b) 0))))
(+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 b (.f64 b (.f64 y-scale (*.f64 y-scale 0))))))
(+.f64 (.f64 (+.f64 (.f64 64/3 (pow.f64 y-scale 3)) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (+.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 b 2) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (*.f64 -8 (pow.f64 y-scale 2)))))))
(fma.f64 (fma.f64 64/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -64/3)) (pow.f64 b 3) (+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) 0)))))
(fma.f64 (fma.f64 64/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -64/3)) (pow.f64 b 3) (+.f64 1 (fma.f64 4 (.f64 y-scale b) (.f64 b (.f64 b (.f64 y-scale (.f64 y-scale 0)))))))
(exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))
(exp.f64 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b))))
(exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (.f64 y-scale b))) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))
1
(+.f64 1 (.f64 8 (.f64 y-scale b)))
(+.f64 1 (.f64 (.f64 y-scale b) 8))
(+.f64 1 (.f64 y-scale (.f64 b 8)))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -16 (pow.f64 b 2)) (.f64 32 (pow.f64 b 2)))) (+.f64 1 (.f64 8 (*.f64 y-scale b))))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 16) (+.f64 1 (.f64 (*.f64 y-scale b) 8)))
(+.f64 1 (fma.f64 8 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (.f64 b (*.f64 b 16))))))
(+.f64 (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 128/3 (pow.f64 b 3)) (.f64 -128 (pow.f64 b 3))))) (+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -16 (pow.f64 b 2)) (.f64 32 (pow.f64 b 2)))) (+.f64 1 (.f64 8 (*.f64 y-scale b)))))
(fma.f64 (pow.f64 y-scale 3) (fma.f64 256/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -256/3)) (fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 16) (+.f64 1 (.f64 (.f64 y-scale b) 8))))
(fma.f64 (pow.f64 y-scale 3) (fma.f64 256/3 (pow.f64 b 3) (.f64 (pow.f64 b 3) -256/3)) (+.f64 1 (fma.f64 8 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (.f64 b (.f64 b 16)))))))
(exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))))
(+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (*.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (*.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)))))
(exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))))
(+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 y-scale b)))))
(+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)))))
(+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (*.f64 y-scale b)))))
(+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)))))
(+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)))))
1
(+.f64 1 (.f64 8 (.f64 y-scale b)))
(+.f64 1 (.f64 (.f64 y-scale b) 8))
(+.f64 1 (.f64 y-scale (.f64 b 8)))
(+.f64 1 (+.f64 (.f64 8 (.f64 y-scale b)) (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (*.f64 32 (pow.f64 y-scale 2))) (pow.f64 b 2))))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 16) (+.f64 1 (.f64 (*.f64 y-scale b) 8)))
(+.f64 1 (fma.f64 8 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (.f64 b (*.f64 b 16))))))
(+.f64 1 (+.f64 (.f64 8 (.f64 y-scale b)) (+.f64 (.f64 (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 128/3 (pow.f64 y-scale 3)) (.f64 -128 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (*.f64 32 (pow.f64 y-scale 2))) (pow.f64 b 2)))))
(+.f64 1 (fma.f64 8 (.f64 y-scale b) (fma.f64 (fma.f64 256/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -256/3)) (pow.f64 b 3) (.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) 16)))))
(+.f64 1 (fma.f64 8 (.f64 y-scale b) (fma.f64 (fma.f64 256/3 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -256/3)) (pow.f64 b 3) (.f64 y-scale (.f64 y-scale (.f64 b (.f64 b 16)))))))
(exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))
(fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(+.f64 (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 2 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 2) (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))
(pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4))))
(+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))))
(+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (*.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)))))
(+.f64 (.f64 1/16 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/2 (/.f64 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (*.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)))))
(fma.f64 1/16 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (+.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 2) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)))))
(.f64 12 (.f64 y-scale b))
(.f64 (.f64 y-scale b) 12)
(.f64 y-scale (.f64 b 12))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 12 (*.f64 y-scale b)))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (.f64 (*.f64 y-scale b) 12))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (.f64 y-scale (*.f64 b 12)))
(+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (*.f64 64 (pow.f64 b 3)))))))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (fma.f64 12 (.f64 y-scale b) (.f64 (pow.f64 y-scale 3) (fma.f64 288 (pow.f64 b 3) (.f64 (pow.f64 b 3) -224)))))
(+.f64 (.f64 (pow.f64 y-scale 4) (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 3) (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (*.f64 64 (pow.f64 b 3))))))))
(fma.f64 (pow.f64 y-scale 4) (fma.f64 -192 (pow.f64 b 4) (fma.f64 864 (pow.f64 b 4) (fma.f64 768 (pow.f64 b 4) (.f64 (pow.f64 b 4) -1440)))) (fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (fma.f64 12 (.f64 y-scale b) (.f64 (pow.f64 y-scale 3) (fma.f64 288 (pow.f64 b 3) (*.f64 (pow.f64 b 3) -224))))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))) 1)
(expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 1)
(+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b))) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))))
(+.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (*.f64 y-scale b))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))))) 1)
(+.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))) -1)
(+.f64 -1 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale b))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))) 1)
(+.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))))) -1)
(+.f64 -1 (+.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale b)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))) (.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)
(expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 1)
(+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b))) (expm1.f64 (.f64 3 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))
(+.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (*.f64 y-scale b))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) 1)
(+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)) (pow.f64 (exp.f64 3) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) -1)
(+.f64 -1 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)) (pow.f64 (exp.f64 3) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 y-scale b))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) 1)
(+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)) (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (pow.f64 (exp.f64 3) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) -1)
(+.f64 -1 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale b)) (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (pow.f64 (exp.f64 3) (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))
(.f64 12 (.f64 y-scale b))
(.f64 (.f64 y-scale b) 12)
(.f64 y-scale (.f64 b 12))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 12 (*.f64 y-scale b)))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (.f64 (*.f64 y-scale b) 12))
(fma.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) 48) (.f64 y-scale (*.f64 b 12)))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (+.f64 (.f64 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 12 (*.f64 y-scale b))))
(fma.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) 48) (fma.f64 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224)) (pow.f64 b 3) (.f64 (.f64 y-scale b) 12)))
(fma.f64 (.f64 b b) (.f64 y-scale (.f64 y-scale 48)) (fma.f64 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224)) (pow.f64 b 3) (.f64 y-scale (.f64 b 12))))
(+.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (+.f64 (.f64 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4)))))) (pow.f64 b 4)) (+.f64 (.f64 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3)))) (pow.f64 b 3)) (.f64 12 (*.f64 y-scale b)))))
(fma.f64 (.f64 b b) (.f64 (.f64 y-scale y-scale) 48) (fma.f64 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672)))) (pow.f64 b 4) (fma.f64 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224)) (pow.f64 b 3) (.f64 (*.f64 y-scale b) 12))))
(fma.f64 (.f64 b b) (.f64 y-scale (.f64 y-scale 48)) (fma.f64 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672)))) (pow.f64 b 4) (fma.f64 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224)) (pow.f64 b 3) (.f64 y-scale (*.f64 b 12)))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))) 1)
(expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b)))) 1)
(+.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b))) 1))
(+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b))) (expm1.f64 (.f64 3 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) 1)
(+.f64 (+.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 b b)))))) -1)
(+.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b)))))) (expm1.f64 (.f64 3 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(-.f64 (+.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale b))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))) 1)
(+.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (-.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 b b)))))) 1))
(+.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale b)) (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 y-scale (.f64 b b))))))) (expm1.f64 (.f64 3 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))
(-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))) 1)
(expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) 1)
(+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b))) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4))))))
(+.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (*.f64 y-scale b))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))))) 1)
(+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))) -1)
(+.f64 -1 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale b))) (+.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))) 1)
(+.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (+.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))) -1)
(+.f64 -1 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale b)) (+.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(-.f64 (/.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 1 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 2)))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))) 2)))
(.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (/.f64 -1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 -1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))))
(/.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))))
(/.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) 2)) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 2))) (-.f64 (.f64 y-scale (.f64 b 4)) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (-.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))) 2))) (-.f64 (.f64 4 (.f64 y-scale b)) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 3))) (+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2) (.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (.f64 y-scale (*.f64 b 4))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) (pow.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))) (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (.f64 4 (*.f64 y-scale b))))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))))
(/.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) 2)) (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (/.f64 1 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))))
(/.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (sqrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))) (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (*.f64 4 b) 2))) 2)))
(pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))) 2)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))) 3)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(pow.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 3) 1/3)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(pow.f64 (/.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)) (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) -1)
(/.f64 1 (/.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))))
(neg.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (neg.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (neg.f64 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 2))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2))) 2))
(log.f64 (exp.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2))) 3))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(exp.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(exp.f64 (.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (.f64 b 4)) 2)))) 1))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (+.f64 (.f64 y-scale (*.f64 b 4)) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (fma.f64 y-scale (.f64 4 b) 2)))
(+.f64 (.f64 y-scale (.f64 b 4)) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(+.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 0)
(fma.f64 y-scale (*.f64 4 b) 1)
(+.f64 1 (.f64 y-scale (.f64 b 4)))
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 0)
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 2) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 1 (+.f64 (.f64 y-scale (*.f64 b 4)) 1))
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (sqrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)))
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)) 2))
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 2) (cbrt.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1)))
(fma.f64 y-scale (*.f64 4 b) 1)
(/.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) (-.f64 1 (.f64 y-scale (.f64 b 4))))
(/.f64 (-.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 2)) (-.f64 1 (.f64 4 (.f64 y-scale b))))
(/.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (.f64 b 4)))))
(/.f64 (+.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 3)) (+.f64 1 (-.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2) (.f64 4 (.f64 y-scale b)))))
(/.f64 (+.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 3)) (-.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2) (-.f64 (.f64 4 (.f64 y-scale b)) 1)))
(/.f64 (.f64 (-.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 2)) 1) (-.f64 1 (.f64 y-scale (*.f64 b 4))))
(/.f64 (-.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 2)) (-.f64 1 (.f64 4 (.f64 y-scale b))))
(/.f64 (.f64 (+.f64 1 (pow.f64 (.f64 y-scale (.f64 b 4)) 3)) 1) (+.f64 1 (-.f64 (pow.f64 (.f64 y-scale (.f64 b 4)) 2) (.f64 y-scale (*.f64 b 4)))))
(/.f64 (+.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 3)) (+.f64 1 (-.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2) (.f64 4 (.f64 y-scale b)))))
(/.f64 (+.f64 1 (pow.f64 (.f64 4 (.f64 y-scale b)) 3)) (-.f64 (pow.f64 (.f64 4 (.f64 y-scale b)) 2) (-.f64 (.f64 4 (.f64 y-scale b)) 1)))
(pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (sqrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 2)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (cbrt.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)) 3)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.f64 b 4))))
(pow.f64 (E.f64) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)) (cbrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)) (cbrt.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (sqrt.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))))
(sqrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 2))
(sqrt.f64 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))
(log.f64 (exp.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)))
(fma.f64 y-scale (*.f64 4 b) 1)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1))))
(fma.f64 y-scale (*.f64 4 b) 1)
(cbrt.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3))
(fma.f64 y-scale (*.f64 4 b) 1)
(expm1.f64 (log.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 2)))
(expm1.f64 (log.f64 (fma.f64 y-scale (*.f64 4 b) 2)))
(log1p.f64 (expm1.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1)))
(fma.f64 y-scale (*.f64 4 b) 1)
(+.f64 1 (-.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 1))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 0)
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(-.f64 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) 1)
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(-.f64 (exp.f64 (log.f64 (+.f64 2 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))) 2)
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(-.f64 (/.f64 1 (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (+.f64 (/.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1))
(-.f64 (/.f64 1 (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (+.f64 1 (/.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (-.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))) 1)
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (sqrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4))))) (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(.f64 (cbrt.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 (pow.f64 1 (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (sqrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(pow.f64 (sqrt.f64 (exp.f64 2)) (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (pow.f64 (cbrt.f64 (exp.f64 4)) (log1p.f64 (.f64 y-scale (.f64 b 4)))) (pow.f64 (cbrt.f64 (exp.f64 2)) (log1p.f64 (.f64 y-scale (*.f64 b 4)))))
(.f64 (pow.f64 (cbrt.f64 (exp.f64 4)) (log1p.f64 (.f64 4 (.f64 y-scale b)))) (pow.f64 (cbrt.f64 (exp.f64 2)) (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))))
(sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 4 (.f64 y-scale b)))))
(log.f64 (exp.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4)))))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(cbrt.f64 (pow.f64 (exp.f64 2) (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))))
(cbrt.f64 (pow.f64 (exp.f64 2) (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(expm1.f64 (log1p.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 2))
(pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)
(exp.f64 (.f64 (.f64 (log1p.f64 (.f64 y-scale (.f64 b 4))) 2) 1))
(pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)
(log1p.f64 (expm1.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(+.f64 1 (+.f64 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b)))) -1))
(pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))
(+.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) -1)
(+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))
(+.f64 -1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3))
(+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))
(-.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1)
(+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))) 1)
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 2))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 2) (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 3)))
(/.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) -1) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))
(/.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3) -1) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) 1) (+.f64 1 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)))
(/.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) -1) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 3) 1) 1) (+.f64 (+.f64 (.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3)) 1) (.f64 (pow.f64 (+.f64 (.f64 y-scale (*.f64 b 4)) 1) 3) 1)))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3) -1) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 3))))
(pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 1)
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(pow.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 2)
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))) 3)
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(pow.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 3) 1/3)
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(sqrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 2))
(sqrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 2))
(log.f64 (exp.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(log.f64 (+.f64 1 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(cbrt.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4))))) 3))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(exp.f64 (.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4)))))) 1))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(log1p.f64 (expm1.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (*.f64 b 4)))))))
(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))

localize154.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	71.5%	(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))
	62.2%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	61.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	37.7%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))

Compiler

Compiled 365 to 247 computations (32.3% saved)

series66.0ms (0.1%)

Counts

2 → 92

Calls

24 calls:

Time	Variable		Point	Expression
44.0ms	angle	@	0	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
2.0ms	angle	@	-inf	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
2.0ms	a	@	inf	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
2.0ms	y-scale	@	0	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
2.0ms	x-scale	@	0	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))

rewrite64.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

812×	`add-sqr-sqrt`
790×	`*-un-lft-identity`
780×	`pow1`
746×	`add-cbrt-cube`
746×	`add-cube-cbrt`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	40	210
1	849	210

Stop Event

1×	node limit

Counts

2 → 19

Calls

Call 1

Inputs

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

(sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))

Outputs

(((pow.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((neg.f64 (*.f64 -1/4 (*.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale)) (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((log.f64 (exp.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((cbrt.f64 (*.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2))))) (*.f64 -1/4 (*.f64 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-scale) 2)))) (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((exp.f64 (log.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 (sqrt.f64 (*.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (*.f64 y-scale x-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 -1/4 (*.f64 (/.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (*.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2))) (sqrt.f64 (+.f64 (*.f64 2 (*.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (*.f64 2 (*.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) #f)))

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

simplify196.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1460×	`associate-/r/`
1214×	`associate-r`
922×	`times-frac`
710×	`*-commutative`
684×	`associate-l`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	382	17973
1	1332	16577
2	6610	16573

Stop Event

1×	node limit

Counts

111 → 180

Calls

Call 1

Inputs
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.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 (.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.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 (.f64 1/8 (/.f64 (.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 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (.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 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (.f64 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(+.f64 (.f64 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(.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 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 angle 4) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 y-scale (.f64 (pow.f64 angle 6) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 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/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.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 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 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 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.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 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.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 b (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(+.f64 (.f64 1/4 (.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 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 -1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(*.f64 (sqrt.f64 2) b)
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (.f64 (sqrt.f64 2) b))
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 (sqrt.f64 2) b) (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (*.f64 (sqrt.f64 2) b)))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 (sqrt.f64 2) b) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 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/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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/2 (/.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (*.f64 (sqrt.f64 2) b))))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(pow.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
(neg.f64 (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale)) (pow.f64 (.f64 y-scale x-scale) 2))))
(log.f64 (exp.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(exp.f64 (log.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(log1p.f64 (expm1.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 1 (sqrt.f64 (.f64 2 (+.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 (sqrt.f64 (.f64 2 (+.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)))) 1)
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.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 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))))
(pow.f64 (.f64 2 (+.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))) 1/2)
(pow.f64 (sqrt.f64 (.f64 2 (+.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)))) 1)
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.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))))))
(cbrt.f64 (.f64 2 (.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)) (sqrt.f64 (.f64 2 (+.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)))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.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))))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.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))))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.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))))))

Outputs
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.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 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(.f64 1/4 (+.f64 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.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 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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 1/4 (+.f64 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 -1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 y-scale -1/8) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(+.f64 (.f64 -1/8 (/.f64 (.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 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.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 (.f64 1/8 (/.f64 (.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 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (/.f64 (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (pow.f64 a 6))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 -1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)))))
(fma.f64 1/8 (/.f64 (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (pow.f64 a 6))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 y-scale -1/8) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/4 (.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 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (+.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (.f64 (.f64 -1/8 y-scale) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 (/.f64 (.f64 -1/8 y-scale) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (/.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (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 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (.f64 1/8 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (/.f64 (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (pow.f64 b 6))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (.f64 1/8 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5))) (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 6))))))
(.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) -1/4)
(+.f64 (.f64 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))))
(fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 1/8 y-scale) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))))
(+.f64 (.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 (.f64 1/8 y-scale) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (/.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (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 -1/4 (/.f64 (.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 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 5))))))))
(fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))
(fma.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a))) -1/4 (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (/.f64 (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (pow.f64 b 6)))) (.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) -1/4))))
(fma.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8))) -1/4 (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5)) (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) -1/4))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (sqrt.f64 8)))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) b)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (/.f64 y-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (.f64 (.f64 angle angle) (sqrt.f64 8)))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 angle 4) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b)))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) b))) (.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 4)) (.f64 (sqrt.f64 8) (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)))) (.f64 b (sqrt.f64 2))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b)))) (/.f64 b (.f64 angle angle)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 b (sqrt.f64 2))) (.f64 (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 angle angle) b) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 b (sqrt.f64 2))) (.f64 (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 2) (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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 y-scale (.f64 (pow.f64 angle 6) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 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/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 b 2))))) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (.f64 (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2)) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) b))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) b))) (.f64 1/8 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 angle 6) (.f64 (sqrt.f64 8) (-.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (.f64 1/2 (.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 2) 2)))))) b)) (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 4)) (.f64 (sqrt.f64 8) (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)))) (.f64 b (sqrt.f64 2)))))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b)))) (/.f64 b (.f64 angle angle)))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (+.f64 (/.f64 (pow.f64 angle 6) (/.f64 b (.f64 (sqrt.f64 8) (-.f64 (.f64 2 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2))) (.f64 b b))))))) (/.f64 (.f64 (sqrt.f64 8) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2))) (/.f64 b (pow.f64 angle 4))))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (*.f64 (sqrt.f64 8) b) y-scale)))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 angle angle) b) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (+.f64 (.f64 (/.f64 (.f64 (pow.f64 angle 6) (-.f64 (.f64 2 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2))) (.f64 b b))))) b) (sqrt.f64 8)) (.f64 (/.f64 (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2))) b) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))))
(.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 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 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 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.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)))))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(+.f64 (/.f64 (.f64 (.f64 -1/8 y-scale) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 (/.f64 (.f64 -1/8 y-scale) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3)))) (/.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (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 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 b 6) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.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))))))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 4)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (fma.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (sqrt.f64 8) (.f64 b b))) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/8 (/.f64 (.f64 (.f64 y-scale (pow.f64 b 6)) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))))))
(+.f64 (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (.f64 1/8 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (/.f64 (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (pow.f64 b 6))))) (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) a)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (sqrt.f64 8)) (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/8 (.f64 (/.f64 y-scale (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 a 3))))) (.f64 (sqrt.f64 8) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (.f64 1/8 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 5))) (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 6))))))
(.f64 1/4 (.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 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 1/4 (.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 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 1/4 (+.f64 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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 1/4 (+.f64 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 -1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 y-scale -1/8) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/4 (.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/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 -1/8 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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 1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (fma.f64 1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 1/8 (/.f64 (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (pow.f64 a 6))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 -1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)))))
(fma.f64 1/8 (/.f64 (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (pow.f64 a 6))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 y-scale -1/8) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))
(.f64 -1/4 (.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/4 y-scale) (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1/4 (.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 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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)))) 1/8)))
(fma.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(+.f64 (.f64 -1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/4 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (+.f64 (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))) (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8)))) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 -1/8 (/.f64 y-scale (/.f64 (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (fma.f64 -1/4 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 a a) (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 (.f64 (/.f64 y-scale (pow.f64 (sqrt.f64 2) 3)) (/.f64 (.f64 (.f64 (pow.f64 a 4) (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)))) 1/8))))
(fma.f64 -1/8 (/.f64 (/.f64 (.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (pow.f64 a 6))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)) (fma.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (.f64 1/8 y-scale) (/.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3)))) (.f64 (sqrt.f64 8) (pow.f64 a 4))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)))))
(.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 -1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 2)))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 -1/2 (pow.f64 a 4)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 -1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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 1/2 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5))) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 (/.f64 (.f64 -1/2 (pow.f64 a 4)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))))
(.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))
(+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2))))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(neg.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(.f64 (.f64 (neg.f64 (sqrt.f64 2)) a) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.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)))))) (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2))))))
(+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.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 1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))))))
(fma.f64 -1 (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2))))) (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)) 1/2)))
(-.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) 1/2)) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))) (fma.f64 -1 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (fma.f64 -1 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.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 1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (fma.f64 -1 (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2))))) (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) 1/2))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)) 1/2)) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))))))
(*.f64 (sqrt.f64 2) b)
(*.f64 b (sqrt.f64 2))
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (.f64 (sqrt.f64 2) b))
(fma.f64 1/2 (.f64 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (sqrt.f64 2)) (/.f64 (.f64 angle angle) b)) (.f64 b (sqrt.f64 2)))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (*.f64 b (sqrt.f64 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 angle angle) (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) (*.f64 b (sqrt.f64 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 (sqrt.f64 2) b) (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (*.f64 (sqrt.f64 2) b)))))
(fma.f64 1/2 (.f64 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (sqrt.f64 2)) (/.f64 (.f64 angle angle) b)) (fma.f64 (sqrt.f64 2) b (/.f64 (.f64 1/2 (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)))) (*.f64 b (sqrt.f64 2)))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 2))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2))) (*.f64 b (sqrt.f64 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 angle angle) (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 2))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2))) (.f64 b (sqrt.f64 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (pow.f64 angle 2)) (.f64 (sqrt.f64 2) b))) (+.f64 (.f64 (sqrt.f64 2) b) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (.f64 2 (.f64 (pow.f64 b 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/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 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/2 (/.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 2 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (.f64 -1/1574640000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 1/16200 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/16200 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)))) (.f64 (sqrt.f64 2) b))) 2))) (*.f64 (sqrt.f64 2) b))))))
(fma.f64 1/2 (.f64 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (sqrt.f64 2)) (/.f64 (.f64 angle angle) b)) (fma.f64 (sqrt.f64 2) b (.f64 1/2 (+.f64 (.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 2 (+.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (.f64 1/2 (.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)))) (.f64 (.f64 b b) (pow.f64 (sqrt.f64 2) 2)))) b)) (.f64 (/.f64 (pow.f64 angle 4) (sqrt.f64 2)) (/.f64 (-.f64 (fma.f64 2 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 -1/1574640000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b (sqrt.f64 2)))) 2)) b))))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (fma.f64 1/2 (fma.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 2 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2))) (.f64 b b)))) b) (.f64 (/.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 2))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (/.f64 1/2 (/.f64 (.f64 b (sqrt.f64 2)) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))))) 2)))) (*.f64 b (sqrt.f64 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 angle angle) (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) (fma.f64 1/2 (fma.f64 (/.f64 (pow.f64 angle 6) (sqrt.f64 2)) (/.f64 (-.f64 (.f64 2 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (.f64 1/4 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2))) (.f64 b b)))) b) (.f64 (/.f64 (pow.f64 angle 4) (.f64 b (sqrt.f64 2))) (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2)))) (*.f64 b (sqrt.f64 2))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))
(+.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(+.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))
(+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (+.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(+.f64 (.f64 (/.f64 (.f64 b b) (sqrt.f64 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (pow.f64 b 6) (.f64 (pow.f64 a 5) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5)))) (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 (sqrt.f64 2) 3)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 a 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3)))) (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (pow.f64 b 4) (.f64 2 (sqrt.f64 2))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 a 3)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 1/2 (.f64 (/.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5) (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 a 5)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (fma.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 2))))))
(.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(+.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))
(fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 -1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 2)))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 -1/2 (pow.f64 a 4)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (+.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3))))))))
(+.f64 (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 3)))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 -1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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 1/2 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5))) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))))
(+.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (.f64 (/.f64 (.f64 -1/2 (pow.f64 a 4)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))))
(.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))
(neg.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 2) (neg.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))
(+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))
(.f64 -1 (+.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(neg.f64 (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 -1 (+.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(fma.f64 1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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)))) (neg.f64 (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))))))
(-.f64 (.f64 (/.f64 1/2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 (sqrt.f64 2) 5) (.f64 (pow.f64 b 5) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (pow.f64 (sqrt.f64 2) 3) (.f64 (pow.f64 b 3) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))) (.f64 -1 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b))))))
(fma.f64 -1/2 (/.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 5) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (.f64 (.f64 (pow.f64 (sqrt.f64 2) 3) (pow.f64 b 3)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3))) (.f64 -1 (+.f64 (.f64 (.f64 b (sqrt.f64 2)) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (.f64 (/.f64 (.f64 a a) (sqrt.f64 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (fma.f64 1/2 (.f64 (/.f64 (/.f64 (pow.f64 a 4) (sqrt.f64 2)) 2) (/.f64 (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)))) (neg.f64 (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 2))))))))
(fma.f64 -1/2 (.f64 (/.f64 (pow.f64 a 6) (pow.f64 (sqrt.f64 2) 5)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (pow.f64 b 5)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 5))) (-.f64 (.f64 (/.f64 1/2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (.f64 2 (.f64 (sqrt.f64 2) (pow.f64 b 3))))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (fma.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 2)))))))
(pow.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(neg.f64 (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale)) (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(log.f64 (exp.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))
(cbrt.f64 (.f64 -1/4 (.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))) (.f64 (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))))))
(cbrt.f64 (pow.f64 (.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale)) 3))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(exp.f64 (log.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(log1p.f64 (expm1.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))) x-scale)) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))
(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(.f64 1 (sqrt.f64 (.f64 2 (+.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)))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(.f64 (sqrt.f64 (.f64 2 (+.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)))) 1)
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (sqrt.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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)))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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)))))) (cbrt.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(pow.f64 (.f64 2 (+.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))) 1/2)
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(pow.f64 (sqrt.f64 (.f64 2 (+.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)))) 1)
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(cbrt.f64 (.f64 2 (.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)) (sqrt.f64 (.f64 2 (+.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)))))))
(cbrt.f64 (.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(cbrt.f64 (.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))))
(expm1.f64 (log1p.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))
(log1p.f64 (expm1.f64 (sqrt.f64 (.f64 2 (+.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))))))
(sqrt.f64 (.f64 2 (+.f64 (.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 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) 2))))

eval1.1s (1%)

Compiler: Compiled 56761 to 42712 computations (24.8% saved)

prune507.0ms (0.5%)

Pruning

163 alts after pruning (160 fresh and 3 done)

	Pruned	Kept	Total
New	639	58	697
Fresh	25	102	127
Picked	1	0	1
Done	2	3	5
Total	667	163	830

Accurracy

54.1%

Counts

830 → 163

Alt Table

Click to see full alt table

Status	Accuracy	Program
	16.5%	(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
	6.9%	(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
	11.9%	(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
	7.8%	(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	1.7%	(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
	11.9%	(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))
	9.8%	(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 angle angle) b) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 b (sqrt.f64 2))) (.f64 (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
	6.9%	(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
	5.3%	(pow.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
	0.3%	(/.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)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (/.f64 (.f64 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	1.9%	(/.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)) (+.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 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	2.9%	(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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)))))
	3.9%	(.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)))))
	4.5%	(.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))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (.f64 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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 1 2) (.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)))))
	3.5%	(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.1%	(.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)))
	7.5%	(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
	16.2%	(.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
	10.3%	(.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
	6.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
	4.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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)))))
	4.9%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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))))
	4.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))))
	4.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
	11.5%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
	6.1%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
	11.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
	5.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) a))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.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))))))))))
	3.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale)))))
	6.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
	2.4%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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))))))))))
	4.5%	(.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)))))))
	4.9%	(.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 angle (.f64 1/180 (PI.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.9%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
	9.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
	6.8%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
	4.5%	(.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)))))))
	10.4%	(.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
	10.3%	(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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))))))
	4.7%	(.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)))))))
	7.1%	(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	4.5%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) 3) 1/3))
▶	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3))
	7.8%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/2) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)) 3) 1/3))
	17.9%	(.f64 (.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))) 3))
	9.5%	(.f64 (.f64 1/4 y-scale) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4)))))))
	8.0%	(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
	17.9%	(.f64 (.f64 1/4 y-scale) (.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2))))
	8.1%	(.f64 (.f64 1/4 y-scale) (.f64 (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) b))) 1) (sqrt.f64 2)))
✓	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
	17.9%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
	5.2%	(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6)))
	9.5%	(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
	14.0%	(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
	15.6%	(.f64 (.f64 1/4 y-scale) (.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4))))))
	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
	9.5%	(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
	3.1%	(.f64 (.f64 1/4 y-scale) (log.f64 (exp.f64 (*.f64 b 4))))
	8.3%	(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 b 4))))
	10.4%	(.f64 (.f64 1/4 y-scale) (cbrt.f64 (pow.f64 (*.f64 b 4) 3)))
	4.0%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) x-scale))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.3%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (.f64 b (sqrt.f64 2)))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (.f64 2 (+.f64 (.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)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	1.3%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.9%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.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)))))))
	6.5%	(.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.9%	(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	11.6%	(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
	11.6%	(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
	8.1%	(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
	7.4%	(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
	7.1%	(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
	16.8%	(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	7.1%	(.f64 1/4 (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
	9.7%	(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
	11.5%	(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
	7.1%	(.f64 1/4 (pow.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3) 1/3))
	17.5%	(.f64 1/4 (pow.f64 (.f64 (sqrt.f64 (*.f64 y-scale b)) 2) 2))
	18.0%	(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
	6.0%	(.f64 1/4 (/.f64 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
	1.6%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))))
	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (sqrt.f64 (exp.f64 2)) (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))))
▶	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
	8.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) 8))))))
	8.6%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))))))))
	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 2))))))
	2.2%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
	2.4%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))))))
	9.7%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
	9.1%	(.f64 1/4 (/.f64 (exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
▶	13.9%	(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
	8.4%	(.f64 1/4 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b))))
	16.6%	(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
	9.7%	(.f64 1/4 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b))))))
	2.1%	(.f64 1/4 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))
	7.1%	(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	6.2%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
	17.9%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	17.9%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	7.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	13.3%	(.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)))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 3)))
	12.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
	9.4%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (sqrt.f64 8))))))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
	9.5%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
	3.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
	8.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
▶	27.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
	17.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	16.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	3.5%	(.f64 1/4 (.f64 y-scale (.f64 (.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)))))))))
	5.0%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	4.6%	(.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	10.3%	(.f64 1/4 (.f64 y-scale (.f64 (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))))))))
	7.4%	(.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)))))))))
	13.4%	(.f64 1/4 (.f64 x-scale (.f64 (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))))))))
	6.4%	(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
✓	18.2%	(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
	27.6%	(.f64 1/4 (fabs.f64 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3)))
	20.4%	(.f64 1/4 (fabs.f64 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1)))
✓	28.0%	(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
	11.1%	(.f64 1/4 (fabs.f64 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3))))
	16.4%	(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
	7.6%	(.f64 1/4 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3)))
	7.3%	(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
	12.1%	(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	6.5%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
▶	12.0%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	12.6%	(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	12.6%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	8.1%	(.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
	5.7%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	12.6%	(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
	6.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	5.1%	(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
	3.5%	(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
	6.6%	(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
	3.9%	(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))

Compiler

Compiled 15193 to 11493 computations (24.4% saved)

localize19.0ms (0%)

Local Accuracy

Found 2 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(.f64 (sqrt.f64 8) (.f64 y-scale b))
✓	99.3%	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))

Compiler

Compiled 52 to 36 computations (30.8% saved)

series74.0ms (0.1%)

Counts

2 → 48

Calls

12 calls:

Time	Variable		Point	Expression
72.0ms	y-scale	@	-inf	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
0.0ms	y-scale	@	0	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
0.0ms	y-scale	@	inf	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
0.0ms	b	@	inf	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
0.0ms	b	@	-inf	(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))

rewrite74.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1036×	`*-commutative`
908×	`sqrt-prod`
794×	`unswap-sqr`
648×	`swap-sqr`
402×	`sqr-pow`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	13	48
1	260	44
2	2999	44

Stop Event

1×	node limit

Counts

2 → 43

Calls

Call 1

Inputs
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.f64 (sqrt.f64 8) (.f64 y-scale b))

Outputs

(((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((sqrt.f64 (*.f64 2 (*.f64 8 (pow.f64 (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (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 (sqrt.f64 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((cbrt.f64 (*.f64 (*.f64 2 (sqrt.f64 2)) (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)))

(((+.f64 0 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((+.f64 (-.f64 0 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((-.f64 0 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((-.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 0 (*.f64 8 (pow.f64 (*.f64 y-scale b) 2))) (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 3) 1) (+.f64 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b))))) (+.f64 1 (*.f64 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((/.f64 (-.f64 0 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)) 3)) (+.f64 0 (+.f64 (*.f64 8 (pow.f64 (*.f64 y-scale b) 2)) (*.f64 0 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (sqrt.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (cbrt.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((pow.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((neg.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((sqrt.f64 (*.f64 8 (pow.f64 (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((fabs.f64 (-.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)) 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 (sqrt.f64 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) 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 (sqrt.f64 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log.f64 (/.f64 1 (pow.f64 (pow.f64 (exp.f64 b) 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 (sqrt.f64 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((cbrt.f64 (pow.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((expm1.f64 (log1p.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((exp.f64 (log.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)) ((log1p.f64 (expm1.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale 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 2) (fabs.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale b)))) (*.f64 (sqrt.f64 8) (*.f64 y-scale b))) #f)))

simplify74.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

986×	`associate-/l*`
962×	`distribute-lft-in`
904×	`distribute-rgt-in`
748×	`*-commutative`
672×	`unswap-sqr`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	117	2449
1	332	2237
2	1416	2225
3	7685	2225

Stop Event

1×	node limit

Counts

91 → 65

Calls

Call 1

Inputs
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))) -1)
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))) 1)
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1))))
(pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 1)
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 2)
(pow.f64 (cbrt.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 3)
(pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 3) 1/3)
(sqrt.f64 (.f64 2 (.f64 8 (pow.f64 (*.f64 y-scale b) 2))))
(fabs.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8)) (sqrt.f64 2)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))))
(cbrt.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 3))
(cbrt.f64 (.f64 (.f64 2 (sqrt.f64 2)) (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(+.f64 0 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) -1)
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1)
(-.f64 0 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 1))
(/.f64 (-.f64 0 (.f64 8 (pow.f64 (.f64 y-scale b) 2))) (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1))))
(/.f64 (-.f64 0 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)) (+.f64 0 (+.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)) (.f64 0 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))))
(pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 1)
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 2)
(pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3)
(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3) 1/3)
(neg.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)))
(fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(fabs.f64 (-.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 0))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8)))
(log.f64 (/.f64 1 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8))))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))

Outputs
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))) -1)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))) 1)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b)))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) y-scale) b)))) 3) -1) (fma.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) y-scale) b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) y-scale) b)))) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) y-scale) b)))) 1)))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))) 3)) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))) (+.f64 1 (exp.f64 (.f64 2 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8))))))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (.f64 y-scale b)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (.f64 y-scale b))))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (.f64 y-scale b))))))))
(pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 1)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 2)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(pow.f64 (cbrt.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 3)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 3) 1/3)
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(sqrt.f64 (.f64 2 (.f64 8 (pow.f64 (*.f64 y-scale b) 2))))
(sqrt.f64 (.f64 16 (pow.f64 (.f64 y-scale b) 2)))
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(fabs.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(log.f64 (pow.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8)) (sqrt.f64 2)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(cbrt.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b))) 3))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(cbrt.f64 (.f64 (.f64 2 (sqrt.f64 2)) (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(exp.f64 (log.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (*.f64 y-scale b)))))
(.f64 (sqrt.f64 2) (fabs.f64 (.f64 (*.f64 (sqrt.f64 8) y-scale) b)))
(.f64 (sqrt.f64 2) (.f64 y-scale (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 8) (.f64 (sqrt.f64 2) (*.f64 y-scale b)))
(+.f64 0 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) -1)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(+.f64 (-.f64 0 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1)
(neg.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))
(.f64 (sqrt.f64 8) (.f64 b (neg.f64 y-scale)))
(.f64 b (.f64 y-scale (neg.f64 (sqrt.f64 8))))
(-.f64 0 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(neg.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))
(.f64 (sqrt.f64 8) (.f64 b (neg.f64 y-scale)))
(.f64 b (.f64 y-scale (neg.f64 (sqrt.f64 8))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale b)))) 1))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(/.f64 (-.f64 0 (.f64 8 (pow.f64 (.f64 y-scale b) 2))) (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(/.f64 (neg.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2))) (.f64 (.f64 (sqrt.f64 8) y-scale) b))
(/.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) -8) (.f64 y-scale (.f64 b (sqrt.f64 8))))
(/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8))) -8))
(/.f64 (-.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 3) 1) (+.f64 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))) (+.f64 1 (.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1))))
(/.f64 (+.f64 (pow.f64 (exp.f64 (log1p.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))) 3) -1) (+.f64 (exp.f64 (+.f64 (log1p.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b)) (log1p.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b)))) (+.f64 1 (exp.f64 (log1p.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))))))
(/.f64 (+.f64 -1 (pow.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) 3)) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) (exp.f64 (.f64 2 (log1p.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8)))))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8)))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))) (pow.f64 (exp.f64 2) (log1p.f64 (.f64 y-scale (*.f64 b (sqrt.f64 8))))))))
(/.f64 (-.f64 0 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)) (+.f64 0 (+.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)) (.f64 0 (.f64 (sqrt.f64 8) (*.f64 y-scale b))))))
(/.f64 (neg.f64 (pow.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b) 3)) (fma.f64 8 (pow.f64 (*.f64 y-scale b) 2) 0))
(/.f64 (neg.f64 (pow.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))) 3)) (.f64 8 (pow.f64 (.f64 y-scale b) 2)))
(pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 1)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(pow.f64 (sqrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 2)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3) 1/3)
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(neg.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(neg.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))
(.f64 (sqrt.f64 8) (.f64 b (neg.f64 y-scale)))
(.f64 b (.f64 y-scale (neg.f64 (sqrt.f64 8))))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 y-scale b) 2)))
(fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(fabs.f64 (-.f64 1 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(fabs.f64 (-.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 0))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log.f64 (/.f64 1 (pow.f64 (pow.f64 (exp.f64 b) y-scale) (sqrt.f64 8))))
(neg.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))
(.f64 (sqrt.f64 8) (.f64 b (neg.f64 y-scale)))
(.f64 b (.f64 y-scale (neg.f64 (sqrt.f64 8))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))
(log1p.f64 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))
(.f64 (.f64 (sqrt.f64 8) y-scale) b)
(.f64 y-scale (.f64 b (sqrt.f64 8)))

localize14.0ms (0%)

Local Accuracy

Found 3 expressions with local accuracy:

New	Accuracy	Program
✓	100.0%	(+.f64 1 (.f64 4 (.f64 y-scale b)))
	100.0%	(.f64 4 (.f64 y-scale b))
✓	96.8%	(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)

Compiler

Compiled 45 to 29 computations (35.6% saved)

series1.0ms (0%)

Counts

2 → 30

Calls

12 calls:

Time	Variable		Point	Expression
0.0ms	y-scale	@	0	(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)
0.0ms	y-scale	@	-inf	(+.f64 1 (.f64 4 (.f64 y-scale b)))
0.0ms	y-scale	@	inf	(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)
0.0ms	b	@	inf	(+.f64 1 (.f64 4 (.f64 y-scale b)))
0.0ms	y-scale	@	-inf	(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)

rewrite132.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

888×	`associate-*r/`
870×	`*-commutative`
720×	`associate-*l/`
656×	`distribute-lft-in`
618×	`distribute-rgt-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	10	44
1	218	28
2	2864	28

Stop Event

1×	node limit

Counts

2 → 183

Calls

Call 1

Inputs
(-.f64 (+.f64 1 (.f64 4 (.f64 y-scale b))) 1)
(+.f64 1 (.f64 4 (.f64 y-scale b)))

Outputs

(((+.f64 1 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((+.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((+.f64 0 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((+.f64 (fma.f64 4 (*.f64 y-scale b) -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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((+.f64 -1 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 1 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 y-scale (*.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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 b (*.f64 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 (sqrt.f64 (*.f64 y-scale b)) 2) (*.f64 (sqrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (sqrt.f64 b) (*.f64 (sqrt.f64 b) (*.f64 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (sqrt.f64 (*.f64 y-scale b)) (*.f64 4 (sqrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) 2) (cbrt.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (cbrt.f64 b) (*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (cbrt.f64 (*.f64 y-scale b)) (*.f64 4 (pow.f64 (cbrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (*.f64 y-scale b)) 2) (*.f64 4 (cbrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 y-scale) 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 b) 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 (pow.f64 (cbrt.f64 (*.f64 y-scale b)) 2)) (cbrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 (sqrt.f64 b) (*.f64 4 y-scale)) (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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 4 y-scale)) (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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 (sqrt.f64 (*.f64 y-scale b))) (sqrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (*.f64 4 (cbrt.f64 (*.f64 y-scale b))) (pow.f64 (cbrt.f64 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (+.f64 1 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1))) (-.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (-.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 1) (+.f64 1 (sqrt.f64 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))) (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (-.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))) (*.f64 b (*.f64 y-scale -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 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (+.f64 (fma.f64 4 (*.f64 y-scale b) 1) (*.f64 (pow.f64 (*.f64 y-scale b) 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) (*.f64 (+.f64 (*.f64 b (*.f64 y-scale -4)) -2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)))) (-.f64 (*.f64 (*.f64 4 (*.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((*.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) 3) (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) 3))) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) (*.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (-.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 1 (/.f64 1 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 1 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1))) (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (/.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (/.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1))) (/.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (fma.f64 4 (*.f64 y-scale b) -1))) (-.f64 1 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) 1) (*.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) (*.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) (*.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1))) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) -1) 3)) (+.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) 3) 1) (*.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) 3) 1) (*.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1))) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (+.f64 (*.f64 b (*.f64 y-scale -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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 1 (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (fma.f64 4 (*.f64 y-scale b) -1)))) (-.f64 1 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 1 (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) -1) 3))) (+.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 y-scale b)) 2) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (*.f64 (sqrt.f64 (*.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1))) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1))) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (-.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (fma.f64 4 (*.f64 y-scale b) -1))) 1) (-.f64 1 (fma.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) -1) 3)) 1) (+.f64 1 (*.f64 (fma.f64 4 (*.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) 1) (+.f64 (*.f64 b (*.f64 y-scale -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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (*.f64 (sqrt.f64 (*.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (*.f64 (sqrt.f64 (*.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))) (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1)) (pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) 1) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) 3) 1) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (-.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)))) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)))) (+.f64 (*.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) 1) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (*.f64 (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)))) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (*.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale b)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((pow.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((pow.f64 (*.f64 (sqrt.f64 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((pow.f64 (cbrt.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((pow.f64 (*.f64 (pow.f64 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((neg.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) -1) (+.f64 (*.f64 b (*.f64 y-scale -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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((neg.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2) (+.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((sqrt.f64 (*.f64 (pow.f64 (*.f64 y-scale b) 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((log.f64 (pow.f64 (exp.f64 4) (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((cbrt.f64 (*.f64 (pow.f64 (*.f64 y-scale 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>) ((-.f64 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((expm1.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((exp.f64 (log.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((log1p.f64 (expm1.f64 (*.f64 4 (*.f64 y-scale 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 (+.f64 1 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((fma.f64 1 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((fma.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)) ((fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 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 (*.f64 4 (*.f64 y-scale b))) 1) (+.f64 1 (*.f64 4 (*.f64 y-scale b)))) #f)))

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

simplify127.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1478×	`associate-+l+`
1292×	`associate-+r+`
778×	`associate-r`
726×	`associate-l`
700×	`+-commutative`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	454	10639
1	1279	9735
2	5994	9725

Stop Event

1×	node limit

Counts

213 → 274

Calls

Call 1

Inputs
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
1
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
1
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(+.f64 1 (fma.f64 4 (*.f64 y-scale b) -1))
(+.f64 (.f64 4 (.f64 y-scale b)) 0)
(+.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1)
(+.f64 0 (.f64 4 (.f64 y-scale b)))
(+.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1)
(+.f64 -1 (fma.f64 4 (*.f64 y-scale b) 1))
(.f64 1 (.f64 4 (*.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(.f64 y-scale (.f64 4 b))
(.f64 b (.f64 4 y-scale))
(.f64 (.f64 y-scale b) 4)
(.f64 (.f64 4 (*.f64 y-scale b)) 1)
(.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (.f64 (sqrt.f64 (*.f64 y-scale b)) 2))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) (*.f64 4 y-scale)))
(.f64 (sqrt.f64 (.f64 y-scale b)) (.f64 4 (sqrt.f64 (.f64 y-scale b))))
(.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 (cbrt.f64 b) (.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 4 y-scale)))
(.f64 (cbrt.f64 (.f64 y-scale b)) (.f64 4 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2)))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (.f64 y-scale b))))
(.f64 (.f64 4 y-scale) b)
(.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(.f64 (.f64 4 b) y-scale)
(.f64 (.f64 4 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2)) (cbrt.f64 (.f64 y-scale b)))
(.f64 (.f64 (sqrt.f64 b) (*.f64 4 y-scale)) (sqrt.f64 b))
(.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 4 y-scale)) (cbrt.f64 b))
(.f64 (.f64 4 (sqrt.f64 (.f64 y-scale b))) (sqrt.f64 (.f64 y-scale b)))
(.f64 (.f64 4 (cbrt.f64 (.f64 y-scale b))) (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2))
(.f64 (+.f64 1 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (-.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 1))
(.f64 (-.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 1) (+.f64 1 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(.f64 (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))
(.f64 (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (.f64 4 (*.f64 y-scale b)))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (-.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (.f64 b (*.f64 y-scale -4)))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (.f64 (+.f64 (.f64 b (.f64 y-scale -4)) -2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (-.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) 1)) 1))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) 3))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (-.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(/.f64 1 (/.f64 1 (.f64 4 (.f64 y-scale b))))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(/.f64 (.f64 4 (.f64 y-scale b)) 1)
(/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))
(/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (.f64 4 (.f64 y-scale b))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))))
(/.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (.f64 y-scale b) -1) 1))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) 1) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (+.f64 (.f64 b (*.f64 y-scale -4)) -2))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))))
(/.f64 (.f64 1 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1)))) (-.f64 1 (fma.f64 4 (*.f64 y-scale b) -1)))
(/.f64 (.f64 1 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3))) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1))))
(/.f64 (.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) 1) (-.f64 1 (fma.f64 4 (*.f64 y-scale b) -1)))
(/.f64 (.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) 1) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1))))
(/.f64 (.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) 1) (+.f64 (.f64 b (.f64 y-scale -4)) -2))
(/.f64 (.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) 1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) 1) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (sqrt.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(pow.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 2)
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1/3)
(neg.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (.f64 b (*.f64 y-scale -4)) -2)))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))))
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(log.f64 (pow.f64 (exp.f64 4) (*.f64 y-scale b)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 4 (.f64 y-scale b)))))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))
(fma.f64 1 (fma.f64 4 (*.f64 y-scale b) 1) -1)
(fma.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) -1)
(fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) -1)
(-.f64 (fma.f64 4 (*.f64 y-scale b) 1) 0)
(-.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) 1)
(-.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (/.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (-.f64 (/.f64 1 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)) 1))
(-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))) 1))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (/.f64 1 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(.f64 1 (fma.f64 4 (.f64 y-scale b) 1))
(.f64 (fma.f64 4 (.f64 y-scale b) 1) 1)
(.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (pow.f64 (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 2))
(.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (/.f64 1 (+.f64 1 (.f64 b (*.f64 y-scale -4)))))
(.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))
(.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (fma.f64 4 (.f64 y-scale b) 1))
(.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1)) (fma.f64 4 (.f64 y-scale b) 1))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (-.f64 1 (.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (.f64 b (.f64 y-scale -4)) (fma.f64 4 (.f64 y-scale b) -1))))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (pow.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) 3))) (+.f64 1 (.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) (-.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) 1))))
(.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1)) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(/.f64 1 (/.f64 1 (fma.f64 4 (*.f64 y-scale b) 1)))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 1 (.f64 b (.f64 y-scale -4))))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (/.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (/.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (fma.f64 4 (*.f64 y-scale b) -1))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (.f64 (pow.f64 (.f64 y-scale b) 2) 16))) (.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))))
(/.f64 (+.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 3)) (.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1)))))
(/.f64 (-.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 3)) (.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))))))
(/.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (+.f64 -1 (neg.f64 (.f64 b (.f64 y-scale -4)))))
(/.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 1 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1)) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) 1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1) (+.f64 -1 (neg.f64 (.f64 b (*.f64 y-scale -4)))))
(/.f64 (.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) 1) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2)) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2)) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (.f64 (pow.f64 (.f64 y-scale b) 2) 16))) (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(/.f64 (.f64 (-.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 3)) (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))))
(/.f64 (.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))
(/.f64 (.f64 (+.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 3)) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1))))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) 1) (fma.f64 4 (*.f64 y-scale b) -1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) 1) (+.f64 1 (.f64 b (.f64 y-scale -4))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (.f64 (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))) (cbrt.f64 (+.f64 1 (.f64 b (*.f64 y-scale -4)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (.f64 (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) -1))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (+.f64 1 (.f64 (sqrt.f64 (.f64 y-scale b)) 2))) (-.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 1))
(pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 1)
(pow.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 2)
(pow.f64 (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 3)
(pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) 1/3)
(neg.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 -1 (neg.f64 (.f64 b (.f64 y-scale -4))))))
(neg.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))))
(sqrt.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))
(log.f64 (exp.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(log.f64 (+.f64 1 (expm1.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(cbrt.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))
(expm1.f64 (log1p.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 1 (.f64 4 (.f64 y-scale b)) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 (*.f64 y-scale b) 4 1)
(fma.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 1)
(fma.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (.f64 4 (.f64 y-scale b))) 1)
(fma.f64 (*.f64 4 y-scale) b 1)

Outputs
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
1
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
1
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(+.f64 1 (fma.f64 4 (*.f64 y-scale b) -1))
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 4 (.f64 y-scale b)) 0)
(.f64 4 (.f64 y-scale b))
(+.f64 (fma.f64 4 (*.f64 y-scale b) 1) -1)
(.f64 4 (.f64 y-scale b))
(+.f64 0 (.f64 4 (.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(+.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1)
(.f64 4 (.f64 y-scale b))
(+.f64 -1 (fma.f64 4 (*.f64 y-scale b) 1))
(.f64 4 (.f64 y-scale b))
(.f64 1 (.f64 4 (*.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(.f64 4 (.f64 y-scale b))
(.f64 y-scale (.f64 4 b))
(.f64 4 (.f64 y-scale b))
(.f64 b (.f64 4 y-scale))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 y-scale b) 4)
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 4 (*.f64 y-scale b)) 1)
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (.f64 (sqrt.f64 (*.f64 y-scale b)) 2))
(.f64 4 (.f64 y-scale b))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) (*.f64 4 y-scale)))
(.f64 4 (.f64 y-scale b))
(.f64 (sqrt.f64 (.f64 y-scale b)) (.f64 4 (sqrt.f64 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
(.f64 4 (.f64 y-scale b))
(.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(.f64 (cbrt.f64 b) (.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 4 y-scale)))
(.f64 4 (.f64 y-scale b))
(.f64 (cbrt.f64 (.f64 y-scale b)) (.f64 4 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2)))
(.f64 4 (.f64 y-scale b))
(.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 4 y-scale) b)
(.f64 4 (.f64 y-scale b))
(.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(.f64 4 (.f64 y-scale b))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(.f64 (.f64 4 b) y-scale)
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 4 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2)) (cbrt.f64 (.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 (sqrt.f64 b) (*.f64 4 y-scale)) (sqrt.f64 b))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 4 y-scale)) (cbrt.f64 b))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 4 (sqrt.f64 (.f64 y-scale b))) (sqrt.f64 (.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(.f64 (.f64 4 (cbrt.f64 (.f64 y-scale b))) (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2))
(.f64 4 (.f64 y-scale b))
(.f64 (+.f64 1 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (-.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 1))
(.f64 4 (.f64 y-scale b))
(.f64 (-.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 1) (+.f64 1 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(.f64 4 (.f64 y-scale b))
(.f64 (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))
(.f64 4 (.f64 y-scale b))
(.f64 (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (.f64 4 (*.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (-.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (.f64 b (*.f64 y-scale -4)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (-.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (.f64 (*.f64 y-scale b) -4))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (.f64 y-scale (*.f64 b -4)))
(.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 (fma.f64 y-scale (*.f64 4 b) 1)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (.f64 (+.f64 (.f64 b (.f64 y-scale -4)) -2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (-.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) 1)) 1))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (fma.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) 1) -1)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (fma.f64 b (*.f64 y-scale -4) -2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (/.f64 (fma.f64 (fma.f64 4 (.f64 y-scale b) 2) (fma.f64 (.f64 y-scale b) -4 -2) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 4)) (fma.f64 4 (.f64 (.f64 y-scale b) (fma.f64 y-scale (*.f64 4 b) 1)) -1)))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) 3))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (-.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 2) 3))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (-.f64 (fma.f64 4 (.f64 y-scale b) 2) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 2) 3) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6))) (fma.f64 (fma.f64 4 (.f64 y-scale b) 2) (-.f64 (fma.f64 4 (.f64 y-scale b) 2) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 4)))
(/.f64 1 (/.f64 1 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(/.f64 (.f64 4 (.f64 y-scale b)) 1)
(.f64 4 (.f64 y-scale b))
(/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))
(.f64 4 (.f64 y-scale b))
(/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))))
(.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (fma.f64 4 (.f64 y-scale b) 2)) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))
(.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (fma.f64 4 (.f64 y-scale b) 2)))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))))
(/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (/.f64 (/.f64 (fma.f64 4 (.f64 y-scale b) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (/.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (/.f64 (fma.f64 4 (.f64 y-scale b) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))))))
(/.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 1 (fma.f64 (.f64 y-scale b) -4 1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 2 (.f64 y-scale (*.f64 b -4))))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) -1) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 4)) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2)))
(.f64 (/.f64 (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (.f64 4 (*.f64 y-scale b)))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6) -1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))
(/.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6) -1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (.f64 y-scale b) -1) 1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (fma.f64 4 (.f64 y-scale b) -1) -1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (fma.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (.f64 4 (.f64 y-scale b)) -2) 1))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) 1) (.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) -1) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 4)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 4)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) -1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3)) (.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)))))
(/.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) 1) -1))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) -1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3)) (.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (+.f64 (.f64 b (*.f64 y-scale -4)) -2))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (fma.f64 b (.f64 y-scale -4) -2))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (fma.f64 (.f64 y-scale b) -4 -2))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (-.f64 (fma.f64 (.f64 y-scale b) -4 -2) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2)))
(/.f64 (.f64 1 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1)))) (-.f64 1 (fma.f64 4 (*.f64 y-scale b) -1)))
(/.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 1 (fma.f64 (.f64 y-scale b) -4 1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 2 (.f64 y-scale (*.f64 b -4))))
(/.f64 (.f64 1 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3))) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (fma.f64 4 (.f64 y-scale b) -1) -1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (fma.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (.f64 4 (.f64 y-scale b)) -2) 1))
(/.f64 (.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (.f64 (sqrt.f64 (*.f64 y-scale b)) 2)))
(.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))) (.f64 (sqrt.f64 (.f64 y-scale b)) 2))
(/.f64 (.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (/.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 2)) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)))
(.f64 (/.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (/.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))))
(/.f64 (.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) 1) (-.f64 1 (fma.f64 4 (*.f64 y-scale b) -1)))
(/.f64 (-.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 1 (fma.f64 (.f64 y-scale b) -4 1)))
(/.f64 (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 y-scale b) -4 1))) (+.f64 2 (.f64 y-scale (*.f64 b -4))))
(/.f64 (.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) 1) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (-.f64 (fma.f64 4 (*.f64 y-scale b) -1) 1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (fma.f64 4 (.f64 y-scale b) -1) -1))))
(/.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) -1) 3)) (fma.f64 (fma.f64 4 (.f64 y-scale b) -1) (+.f64 (.f64 4 (.f64 y-scale b)) -2) 1))
(/.f64 (.f64 (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) 1) (+.f64 (.f64 b (.f64 y-scale -4)) -2))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (fma.f64 b (.f64 y-scale -4) -2))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (fma.f64 (.f64 y-scale b) -4 -2))
(/.f64 (.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) 1) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (-.f64 (fma.f64 (.f64 y-scale b) -4 -2) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2)))
(/.f64 (.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (.f64 (sqrt.f64 (*.f64 y-scale b)) 2)))
(.f64 (/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))) (.f64 (sqrt.f64 (.f64 y-scale b)) 2))
(/.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))) (/.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 2)) (.f64 (sqrt.f64 (.f64 y-scale b)) 2)))
(.f64 (/.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 2))) (sqrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))))
(/.f64 (.f64 (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (/.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))))
(/.f64 (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1)) (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2)) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (/.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 2)) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 2))) (cbrt.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) -1) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 4)) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2)))
(.f64 (/.f64 (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2))) (.f64 4 (*.f64 y-scale b)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) 1) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) 3) -1) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 4) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 4)))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (.f64 (fma.f64 4 (.f64 y-scale b) 2) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (+.f64 1 (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 4)))))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6) -1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)) (+.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3))) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)))
(/.f64 (.f64 (-.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) 1) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (+.f64 (.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (+.f64 1 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) 3) -1) (.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 (+.f64 1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 6))))
(/.f64 (+.f64 -1 (pow.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) 3)) (.f64 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2)) (+.f64 1 (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3) (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 6)))))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) 1) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))
(.f64 4 (.f64 y-scale b))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (sqrt.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)))
(.f64 4 (.f64 y-scale b))
(/.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(.f64 4 (.f64 y-scale b))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (sqrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(/.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (.f64 (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))))) (cbrt.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))
(pow.f64 (.f64 4 (.f64 y-scale b)) 1)
(.f64 4 (.f64 y-scale b))
(pow.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 2)
(.f64 4 (.f64 y-scale b))
(pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 3)
(.f64 4 (.f64 y-scale b))
(pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1/3)
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(neg.f64 (/.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) -1) (+.f64 (.f64 b (*.f64 y-scale -4)) -2)))
(/.f64 (+.f64 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)) 1) (fma.f64 b (.f64 y-scale -4) -2))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2)) (fma.f64 (.f64 y-scale b) -4 -2))
(neg.f64 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3)) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))))
(/.f64 (+.f64 1 (neg.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3))) (neg.f64 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(/.f64 (-.f64 1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (-.f64 (fma.f64 (.f64 y-scale b) -4 -2) (pow.f64 (fma.f64 y-scale (*.f64 4 b) 1) 2)))
(sqrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))
(log.f64 (pow.f64 (exp.f64 4) (*.f64 y-scale b)))
(.f64 4 (.f64 y-scale b))
(log.f64 (+.f64 1 (expm1.f64 (.f64 4 (.f64 y-scale b)))))
(.f64 4 (.f64 y-scale b))
(cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))
(expm1.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(exp.f64 (log.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(log1p.f64 (expm1.f64 (.f64 4 (.f64 y-scale b))))
(.f64 4 (.f64 y-scale b))
(fma.f64 1 (fma.f64 4 (*.f64 y-scale b) 1) -1)
(.f64 4 (.f64 y-scale b))
(fma.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) -1)
(.f64 4 (.f64 y-scale b))
(fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) -1)
(.f64 4 (.f64 y-scale b))
(-.f64 (fma.f64 4 (*.f64 y-scale b) 1) 0)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 2) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (/.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)) (-.f64 (/.f64 1 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)) 1))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (-.f64 (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))) 1))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))) 1)
(+.f64 1 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(-.f64 (+.f64 1 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2))) (/.f64 1 (+.f64 (.f64 4 (*.f64 y-scale b)) 2)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(-.f64 (+.f64 1 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (.f64 y-scale b)) 2)))) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (+.f64 (.f64 4 (*.f64 y-scale b)) 2))))
(+.f64 (-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (.f64 y-scale b) 2))) (/.f64 1 (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2)))) 1)
(+.f64 1 (/.f64 (+.f64 -1 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 3)) (+.f64 (pow.f64 (fma.f64 y-scale (.f64 4 b) 1) 2) (fma.f64 4 (*.f64 y-scale b) 2))))
(.f64 1 (fma.f64 4 (.f64 y-scale b) 1))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (fma.f64 4 (.f64 y-scale b) 1) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (pow.f64 (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 2))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (/.f64 1 (+.f64 1 (.f64 b (*.f64 y-scale -4)))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (fma.f64 4 (.f64 y-scale b) 1))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1)) (fma.f64 4 (.f64 y-scale b) 1))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)) (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 (fma.f64 y-scale (.f64 4 b) 1)) (/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (-.f64 1 (.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (.f64 b (.f64 y-scale -4)) (fma.f64 4 (.f64 y-scale b) -1))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (.f64 (fma.f64 4 (.f64 y-scale b) -1) (.f64 (.f64 y-scale b) -4)))) (-.f64 1 (.f64 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))) (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))))
(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 (fma.f64 4 (.f64 y-scale b) -1) (.f64 y-scale (.f64 b -4)) 1)) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (*.f64 y-scale b) -4 1)))))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (pow.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) 3))) (+.f64 1 (.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) (-.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)) 1))))
(.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (pow.f64 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))) 3))) (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1) -1)))))
(.f64 (/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (+.f64 1 (.f64 64 (pow.f64 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 3)))) (fma.f64 (.f64 4 (.f64 y-scale b)) (.f64 (fma.f64 4 (.f64 y-scale b) -1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (*.f64 y-scale b) -1))) -1)) 1))
(.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1)) (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(.f64 (+.f64 (fma.f64 4 (.f64 y-scale b) 1) (.f64 (pow.f64 (.f64 y-scale b) 2) 16)) (/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 -1)))
(.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 (fma.f64 y-scale (.f64 4 b) 1)) (/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 (pow.f64 (*.f64 y-scale b) 3) 64 -1)))
(/.f64 1 (/.f64 1 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 1 (.f64 b (.f64 y-scale -4))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))))
(.f64 (/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64))))
(.f64 (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)) (/.f64 (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1)))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (/.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))))
(.f64 (/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (+.f64 1 (.f64 (.f64 y-scale b) -4))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16))))
(.f64 (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)) (/.f64 (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)) (fma.f64 (.f64 y-scale b) -4 1)))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (/.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(/.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (/.f64 (/.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))))
(/.f64 (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)) (/.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1) (.f64 (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)) (cbrt.f64 (fma.f64 (pow.f64 (*.f64 y-scale b) 3) 64 1)))))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (/.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))))
(.f64 (/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (+.f64 1 (.f64 (.f64 y-scale b) -4))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))))
(.f64 (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)) (/.f64 (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)) (/.f64 (fma.f64 (.f64 y-scale b) -4 1) (cbrt.f64 (fma.f64 (pow.f64 (*.f64 y-scale b) 2) -16 1)))))
(/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (fma.f64 4 (*.f64 y-scale b) -1))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (pow.f64 (.f64 y-scale b) 3)) 4096)) (.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))) (-.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64))))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (.f64 (pow.f64 (.f64 y-scale b) 2) 16))) (.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) (pow.f64 (.f64 y-scale b) 2)) 256)) (.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4)) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) 16))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 4) -256)) (fma.f64 (.f64 y-scale b) -4 1)) (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1))
(/.f64 (+.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 3)) (.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 3) 3) 262144)) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) (.f64 64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 -1)))))
(/.f64 (/.f64 (fma.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 3) 3) 262144 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1)) (fma.f64 (pow.f64 (.f64 y-scale b) 3) (+.f64 (.f64 4096 (pow.f64 (*.f64 y-scale b) 3)) -64) 1))
(/.f64 (-.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 3)) (.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16))))))
(/.f64 (/.f64 (-.f64 1 (.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 2) 3) 4096)) (+.f64 1 (.f64 (.f64 y-scale b) -4))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) 16)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (fma.f64 (.f64 y-scale b) -4 1)) (+.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1) (.f64 (pow.f64 (.f64 y-scale b) 4) 256)))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (fma.f64 (.f64 y-scale b) -4 1)) (+.f64 (.f64 (pow.f64 (.f64 y-scale b) 4) 256) (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1)))
(/.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (+.f64 -1 (neg.f64 (.f64 b (.f64 y-scale -4)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (-.f64 -1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (-.f64 -1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) -64 -1) (fma.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 (.f64 y-scale b) -4 1) -1))
(/.f64 (.f64 1 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1)) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (/.f64 (sqrt.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(.f64 (/.f64 (sqrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) (sqrt.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))) (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)))
(/.f64 (.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (/.f64 (sqrt.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(.f64 (/.f64 (sqrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) (sqrt.f64 (fma.f64 (.f64 y-scale b) -4 1))) (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (/.f64 (cbrt.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) 2) (cbrt.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))) (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)))
(/.f64 (.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)))) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (/.f64 (cbrt.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) 2) (cbrt.f64 (fma.f64 (.f64 y-scale b) -4 1))) (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)))
(/.f64 (.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) 1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1) (+.f64 -1 (neg.f64 (.f64 b (*.f64 y-scale -4)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (.f64 (+.f64 -1 (neg.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) 1) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (-.f64 -1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (-.f64 -1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) -64 -1) (fma.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 (.f64 y-scale b) -4 1) -1))
(/.f64 (.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) (/.f64 (sqrt.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(.f64 (/.f64 (sqrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) (sqrt.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))) (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)))
(/.f64 (.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (sqrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (/.f64 (sqrt.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(.f64 (/.f64 (sqrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) (sqrt.f64 (fma.f64 (.f64 y-scale b) -4 1))) (sqrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2)) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (/.f64 (cbrt.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) 2) (cbrt.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))) (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1)))
(/.f64 (.f64 (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2)) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(/.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (/.f64 (cbrt.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (cbrt.f64 (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) -16)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (fma.f64 y-scale (.f64 4 b) 1)) 2) (cbrt.f64 (fma.f64 (.f64 y-scale b) -4 1))) (cbrt.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1)))
(/.f64 (.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (.f64 (pow.f64 (.f64 y-scale b) 2) 16))) (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) (pow.f64 (.f64 y-scale b) 2)) 256)) (.f64 (+.f64 1 (.f64 (.f64 y-scale b) -4)) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) 16))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 4) -256)) (fma.f64 (.f64 y-scale b) -4 1)) (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1))
(/.f64 (.f64 (-.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 3)) (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) 16)))))
(/.f64 (/.f64 (-.f64 1 (.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 2) 3) 4096)) (+.f64 1 (.f64 (.f64 y-scale b) -4))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) (+.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 2) 16)))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (fma.f64 (.f64 y-scale b) -4 1)) (+.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1) (.f64 (pow.f64 (.f64 y-scale b) 4) 256)))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (fma.f64 (.f64 y-scale b) -4 1)) (+.f64 (.f64 (pow.f64 (.f64 y-scale b) 4) 256) (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 1)))
(/.f64 (.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (.f64 (pow.f64 (.f64 y-scale b) 3) 64))) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)))
(/.f64 (-.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (pow.f64 (.f64 y-scale b) 3)) 4096)) (.f64 (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))) (-.f64 1 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64))))
(/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 6) -4096)) (.f64 (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1) (-.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64))))
(/.f64 (.f64 (+.f64 1 (pow.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 3)) (/.f64 1 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) 64) 1))))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 3) 3) 262144)) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1))))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) (.f64 64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 -1)))))
(/.f64 (/.f64 (fma.f64 (pow.f64 (pow.f64 (.f64 y-scale b) 3) 3) 262144 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1)) (fma.f64 (pow.f64 (.f64 y-scale b) 3) (+.f64 (.f64 4096 (pow.f64 (*.f64 y-scale b) 3)) -64) 1))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) 1) (fma.f64 4 (*.f64 y-scale b) -1))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) 1) (+.f64 1 (.f64 b (.f64 y-scale -4))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4))))) (sqrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (.f64 (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (cbrt.f64 (+.f64 1 (.f64 b (.f64 y-scale -4)))))) (cbrt.f64 (+.f64 1 (.f64 b (*.f64 y-scale -4)))))
(-.f64 (/.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) -4))) (/.f64 (pow.f64 (.f64 y-scale b) 2) (/.f64 (+.f64 1 (.f64 (*.f64 y-scale b) -4)) 16)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) -16 1) (fma.f64 (.f64 y-scale b) -4 1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))) (sqrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (.f64 (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1)))))) (cbrt.f64 (+.f64 1 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) 1) (+.f64 1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (*.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) 64 1) (fma.f64 4 (.f64 b (.f64 y-scale (fma.f64 4 (.f64 y-scale b) -1))) 1))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) -1))) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) -1)))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(/.f64 (/.f64 (-.f64 (.f64 (pow.f64 (.f64 y-scale b) 2) 16) 1) (+.f64 1 (.f64 (sqrt.f64 (.f64 y-scale b)) 2))) (-.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 1))
(/.f64 (/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (+.f64 1 (.f64 (sqrt.f64 (.f64 y-scale b)) 2))) (fma.f64 (sqrt.f64 (.f64 y-scale b)) 2 -1))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (.f64 (fma.f64 (sqrt.f64 (.f64 y-scale b)) 2 1) (fma.f64 (sqrt.f64 (.f64 y-scale b)) 2 -1)))
(pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 2)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) 3)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(pow.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3) 1/3)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(neg.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16)) (+.f64 -1 (neg.f64 (.f64 b (.f64 y-scale -4))))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 2) 16 -1) (fma.f64 4 (.f64 y-scale b) -1))
(neg.f64 (/.f64 (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (+.f64 -1 (neg.f64 (.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 4 (.f64 y-scale b) -1))))))
(/.f64 (-.f64 -1 (.f64 (pow.f64 (.f64 y-scale b) 3) 64)) (-.f64 -1 (.f64 4 (.f64 (.f64 y-scale b) (fma.f64 4 (.f64 y-scale b) -1)))))
(/.f64 (fma.f64 (pow.f64 (.f64 y-scale b) 3) -64 -1) (fma.f64 (.f64 4 (.f64 y-scale b)) (fma.f64 (.f64 y-scale b) -4 1) -1))
(sqrt.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))
(fabs.f64 (fma.f64 y-scale (*.f64 4 b) 1))
(log.f64 (exp.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(log.f64 (+.f64 1 (expm1.f64 (fma.f64 4 (*.f64 y-scale b) 1))))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(cbrt.f64 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 3))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(expm1.f64 (log1p.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
(log1p.f64 (expm1.f64 (fma.f64 4 (*.f64 y-scale b) 1)))
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 1 (.f64 4 (.f64 y-scale b)) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 (*.f64 y-scale b) 4 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 (.f64 (sqrt.f64 (.f64 y-scale b)) 2) (.f64 (sqrt.f64 (.f64 y-scale b)) 2) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 (pow.f64 (cbrt.f64 (.f64 4 (.f64 y-scale b))) 2) (cbrt.f64 (.f64 4 (.f64 y-scale b))) 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)
(fma.f64 (*.f64 4 y-scale) b 1)
(fma.f64 4 (*.f64 y-scale b) 1)
(fma.f64 y-scale (*.f64 4 b) 1)

localize31.0ms (0%)

Local Accuracy

Found 2 expressions with local accuracy:

New	Accuracy	Program
✓	67.8%	(pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)
✓	44.7%	(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)

Compiler

Compiled 64 to 54 computations (15.6% saved)

series10.0ms (0%)

Counts

2 → 24

Calls

6 calls:

Time	Variable		Point	Expression
2.0ms	b	@	inf	(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
2.0ms	b	@	0	(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
2.0ms	b	@	-inf	(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
1.0ms	b	@	0	(pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)
1.0ms	b	@	-inf	(pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)

rewrite68.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1414×	`add-sqr-sqrt`
1374×	`*-un-lft-identity`
1318×	`add-cube-cbrt`
1310×	`add-cbrt-cube`
1292×	`add-exp-log`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	11	14
1	254	14
2	1984	14

Stop Event

1×	node limit

Counts

2 → 48

Calls

Call 1

Inputs
(pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3)
(pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)

Outputs

(((-.f64 (+.f64 1 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 b (pow.f64 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (sqrt.f64 b) (*.f64 (sqrt.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (pow.f64 (*.f64 (*.f64 b b) 16) 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 (cbrt.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (*.f64 4 (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (*.f64 (*.f64 b b) 16) 1/3) (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 1 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((sqrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((cbrt.f64 (*.f64 64 (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((exp.f64 (*.f64 (log.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)))

(((-.f64 (+.f64 1 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 b (pow.f64 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (sqrt.f64 b) (*.f64 (sqrt.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (cbrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 b 4)) (pow.f64 (*.f64 (*.f64 b b) 16) 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (cbrt.f64 (*.f64 (*.f64 b 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (cbrt.f64 b) 2) (*.f64 (cbrt.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (*.f64 4 (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (*.f64 (*.f64 b b) 16) 1/3) (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 1 1/3) (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((*.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((sqrt.f64 (*.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((cbrt.f64 (*.f64 64 (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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)) ((exp.f64 (*.f64 (log.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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #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>) ((pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3)) #f)))

simplify69.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

786×	`fma-def`
676×	`unswap-sqr`
632×	`associate-+r+`
598×	`distribute-lft-out`
594×	`+-commutative`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	69	1336
1	149	1144
2	286	952
3	835	924
4	1779	924
5	4791	924

Stop Event

1×	node limit

Counts

72 → 36

Calls

Call 1

Inputs
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(*.f64 (cbrt.f64 64) b)
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(-.f64 (+.f64 1 (*.f64 b 4)) 1)
(*.f64 b 4)
(*.f64 b (pow.f64 64 1/3))
(*.f64 4 b)
(.f64 (.f64 b 4) 1)
(.f64 1 (.f64 b 4))
(.f64 (.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) 4))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (pow.f64 (.f64 (.f64 b b) 16) 1/3))
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 (cbrt.f64 b) 4))
(.f64 (.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(.f64 (.f64 4 (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/3) (cbrt.f64 (.f64 b 4)))
(.f64 (pow.f64 1 1/3) (.f64 b 4))
(.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3))
(sqrt.f64 (.f64 (.f64 b b) 16))
(log.f64 (pow.f64 (exp.f64 b) 4))
(cbrt.f64 (*.f64 64 (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(exp.f64 (log.f64 (*.f64 b 4)))
(exp.f64 (.f64 (log.f64 (.f64 b 4)) 1))
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(-.f64 (+.f64 1 (*.f64 b 4)) 1)
(*.f64 b 4)
(*.f64 b (pow.f64 64 1/3))
(*.f64 4 b)
(.f64 (.f64 b 4) 1)
(.f64 1 (.f64 b 4))
(.f64 (.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) 4))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (pow.f64 (.f64 (.f64 b b) 16) 1/3))
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 (cbrt.f64 b) 4))
(.f64 (.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(.f64 (.f64 4 (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/3) (cbrt.f64 (.f64 b 4)))
(.f64 (pow.f64 1 1/3) (.f64 b 4))
(.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3))
(sqrt.f64 (.f64 (.f64 b b) 16))
(log.f64 (pow.f64 (exp.f64 b) 4))
(cbrt.f64 (*.f64 64 (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(exp.f64 (log.f64 (*.f64 b 4)))
(exp.f64 (.f64 (log.f64 (.f64 b 4)) 1))
(log1p.f64 (expm1.f64 (*.f64 b 4)))

Outputs
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(*.f64 (cbrt.f64 64) b)
(*.f64 b (cbrt.f64 64))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(.f64 -1 (.f64 (cbrt.f64 -64) b))
(neg.f64 (*.f64 b (cbrt.f64 -64)))
(*.f64 (cbrt.f64 -64) (neg.f64 b))
(*.f64 b (neg.f64 (cbrt.f64 -64)))
(-.f64 (+.f64 1 (*.f64 b 4)) 1)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(*.f64 b 4)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b (pow.f64 64 1/3))
(*.f64 b (cbrt.f64 64))
(*.f64 4 b)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 b 4) 1)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 1 (.f64 b 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (cbrt.f64 (.f64 b 4)) (pow.f64 (.f64 (.f64 b b) 16) 1/3))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 (cbrt.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 4 (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/3) (cbrt.f64 (.f64 b 4)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (pow.f64 1 1/3) (.f64 b 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3))
(.f64 (cbrt.f64 (pow.f64 (.f64 b 4) 3/2)) (cbrt.f64 (pow.f64 (*.f64 b 4) 3/2)))
(pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/6) 4)
(sqrt.f64 (.f64 (.f64 b b) 16))
(sqrt.f64 (.f64 b (.f64 b 16)))
(log.f64 (pow.f64 (exp.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(cbrt.f64 (*.f64 64 (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(exp.f64 (log.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(exp.f64 (.f64 (log.f64 (.f64 b 4)) 1))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(-.f64 (+.f64 1 (*.f64 b 4)) 1)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(*.f64 b 4)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b (pow.f64 64 1/3))
(*.f64 b (cbrt.f64 64))
(*.f64 4 b)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 b 4) 1)
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 1 (.f64 b 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 (sqrt.f64 b) 2) (*.f64 (sqrt.f64 b) 2))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (sqrt.f64 b) (.f64 (sqrt.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 (.f64 b b) 16)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (cbrt.f64 (.f64 b 4)) (pow.f64 (.f64 (.f64 b b) 16) 1/3))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (cbrt.f64 (.f64 (.f64 b b) 16)) (cbrt.f64 (.f64 b 4)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 (cbrt.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 4 (sqrt.f64 b)) (sqrt.f64 b))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (.f64 4 (pow.f64 (cbrt.f64 b) 2)) (cbrt.f64 b))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/3) (cbrt.f64 (.f64 b 4)))
(.f64 (cbrt.f64 (.f64 b 4)) (cbrt.f64 (.f64 b (.f64 b 16))))
(.f64 (pow.f64 1 1/3) (.f64 b 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3))
(.f64 (cbrt.f64 (pow.f64 (.f64 b 4) 3/2)) (cbrt.f64 (pow.f64 (*.f64 b 4) 3/2)))
(pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/6) 4)
(sqrt.f64 (.f64 (.f64 b b) 16))
(sqrt.f64 (.f64 b (.f64 b 16)))
(log.f64 (pow.f64 (exp.f64 b) 4))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(cbrt.f64 (*.f64 64 (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(exp.f64 (log.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(exp.f64 (.f64 (log.f64 (.f64 b 4)) 1))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)
(log1p.f64 (expm1.f64 (*.f64 b 4)))
(+.f64 (+.f64 1 (*.f64 b 4)) -1)
(+.f64 (*.f64 b 4) 0)
(*.f64 b 4)

localize55.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.7%	(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
	99.4%	(expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
	98.4%	(exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))
✓	88.1%	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))

Compiler

Compiled 149 to 100 computations (32.9% saved)

series27.0ms (0%)

Counts

2 → 48

Calls

12 calls:

Time	Variable		Point	Expression
7.0ms	b	@	-inf	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))
6.0ms	y-scale	@	inf	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))
5.0ms	b	@	inf	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))
5.0ms	y-scale	@	-inf	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))
2.0ms	y-scale	@	0	(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2))))

rewrite98.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1838×	`associate-*r/`
1448×	`associate-*l/`
386×	`add-sqr-sqrt`
376×	`*-un-lft-identity`
372×	`pow1`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	19	114
1	395	110
2	4922	104

Stop Event

1×	node limit

Counts

2 → 49

Calls

Call 1

Inputs

(/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2))))

(*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))

Outputs

(((-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 3) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2)))) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 1 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (/.f64 (*.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 1) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (sqrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2))))) (sqrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 2) (*.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2))))) 2) (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2)))) (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (neg.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (/.f64 1 (neg.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)))) (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (-.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) 2) 2))) (-.f64 (*.f64 4 (*.f64 y-scale b)) (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2) (*.f64 (pow.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) 2) (-.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2) (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (pow.f64 (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)))) (/.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) (hypot.f64 (hypot.f64 1 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2)))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (pow.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (/.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 1) 2))) (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((neg.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (neg.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log.f64 (exp.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) 3) (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((exp.f64 (log.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((exp.f64 (*.f64 (log.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (*.f64 4 (*.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale 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>) ((/.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)))

(((-.f64 (exp.f64 (log1p.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (sqrt.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (cbrt.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((pow.f64 (pow.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((sqrt.f64 (*.f64 (pow.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b))) 2) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log.f64 (pow.f64 (+.f64 (*.f64 4 (*.f64 y-scale b)) 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log.f64 (+.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((cbrt.f64 (pow.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((expm1.f64 (log1p.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((exp.f64 (log.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)) ((log1p.f64 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale 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 (expm1.f64 (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (*.f64 4 (*.f64 y-scale b)))) 2)))) (*.f64 3 (log1p.f64 (*.f64 4 (*.f64 y-scale b))))) #f)))

simplify182.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1084×	`associate-r`
924×	`associate-l`
880×	`*-commutative`
826×	`associate-/r*`
780×	`+-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	663	29937
1	2271	29649

Stop Event

1×	node limit

Counts

97 → 191

Calls

Call 1

Inputs
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b)))))
(+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))))
(+.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 32/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 -64 (pow.f64 b 3)) (.f64 8 (.f64 (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))) b)))))) b)) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))))) (.f64 1/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))) (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))))) b)))))))))) (+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b)))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2) (pow.f64 b 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 3))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2) (pow.f64 b 2))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))))))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 3)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2)))))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))))) (pow.f64 y-scale 3))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))))))
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b)))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b))))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4))))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (+.f64 (.f64 4/3 (.f64 y-scale (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 -64 (pow.f64 y-scale 3)) (+.f64 (.f64 8 (.f64 y-scale (+.f64 (.f64 8 (pow.f64 y-scale 2)) (.f64 -8 (pow.f64 y-scale 2))))) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3)))))))) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (pow.f64 b 4)) (+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b)))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 b 2)))))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 y-scale 2)))))) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 b 2)))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))) 2)))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (pow.f64 b 3))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))))
(.f64 12 (.f64 y-scale b))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (.f64 12 (.f64 y-scale b)))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (.f64 12 (.f64 y-scale b))))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 -192 (.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(.f64 12 (.f64 y-scale b))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (.f64 12 (.f64 y-scale b)))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (.f64 12 (.f64 y-scale b))))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 -192 (.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))) 1)
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(.f64 1 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 1)
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 (.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 1) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 2))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) 2) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 1 (neg.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (-.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) 2))) (-.f64 (.f64 4 (.f64 y-scale b)) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) (-.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (.f64 4 (*.f64 y-scale b))))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1)
(pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 2)
(pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 3)
(pow.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 3) 1/3)
(pow.f64 (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) -1)
(neg.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (neg.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 2))
(log.f64 (exp.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))))
(cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 3))
(cbrt.f64 (/.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 3) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))) 3)))
(expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(exp.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(exp.f64 (.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) 1))
(log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) 1)
(pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1)
(pow.f64 (sqrt.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 2)
(pow.f64 (cbrt.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 3)
(pow.f64 (pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 3) 1/3)
(sqrt.f64 (.f64 (pow.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b))) 2) 9))
(log.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3))
(log.f64 (+.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 1))
(cbrt.f64 (pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 3))
(expm1.f64 (log1p.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(exp.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(exp.f64 (.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1))
(log1p.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))

Outputs
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b)))))
(fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))
(fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12))))))
(+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))))
(fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 (.f64 b b) 0))))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (*.f64 b 12)))))))
(fma.f64 (pow.f64 y-scale 3) (-.f64 (+.f64 (.f64 (pow.f64 b 3) 352/3) (.f64 (pow.f64 b 3) -96)) (fma.f64 1/3 (.f64 b (.f64 12 (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12))))) (.f64 (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 b (.f64 b 0)))) (.f64 b 4/3)))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (*.f64 b 12)))))))
(+.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (+.f64 (.f64 -192 (pow.f64 b 4)) (+.f64 (.f64 864 (pow.f64 b 4)) (+.f64 (.f64 768 (pow.f64 b 4)) (+.f64 (.f64 -1728 (pow.f64 b 4)) (.f64 288 (pow.f64 b 4))))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 32/3 (pow.f64 b 3)) (+.f64 (.f64 -32 (pow.f64 b 3)) (+.f64 (.f64 256/3 (pow.f64 b 3)) (+.f64 (.f64 -64 (pow.f64 b 3)) (.f64 8 (.f64 (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))) b)))))) b)) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))))) (.f64 1/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 b 3)) (+.f64 (.f64 -288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (.f64 4 b)) b))))) (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 8 (pow.f64 b 2)) (.f64 -8 (pow.f64 b 2))))) b)))))))))) (+.f64 (.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (+.f64 (.f64 -288 (pow.f64 b 3)) (+.f64 (.f64 288 (pow.f64 b 3)) (.f64 64 (pow.f64 b 3))))) (+.f64 (.f64 4/3 (.f64 (+.f64 (.f64 -16 (pow.f64 b 2)) (+.f64 (.f64 32 (pow.f64 b 2)) (+.f64 (.f64 -8 (pow.f64 b 2)) (.f64 8 (pow.f64 b 2))))) b)) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 72 (pow.f64 b 2)) (.f64 -24 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 4 b) (.f64 8 b)) b))) (+.f64 (.f64 8 b) (.f64 4 b))))))) (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b)))))))
(fma.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (fma.f64 -192 (pow.f64 b 4) (fma.f64 864 (pow.f64 b 4) (fma.f64 768 (pow.f64 b 4) (.f64 (pow.f64 b 4) -1440))))) (fma.f64 4/3 (.f64 b (fma.f64 32/3 (pow.f64 b 3) (fma.f64 -32 (pow.f64 b 3) (fma.f64 256/3 (pow.f64 b 3) (fma.f64 -64 (pow.f64 b 3) (.f64 8 (.f64 b (.f64 (.f64 b b) 0)))))))) (.f64 1/3 (+.f64 (.f64 (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 (.f64 b b) 0))) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (.f64 b 12) (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 b 3) (.f64 (pow.f64 b 3) -224))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 (.f64 b b) 0)))))))))))) (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 (.f64 b b) 0))))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
(fma.f64 (pow.f64 y-scale 4) (-.f64 (.f64 1/3 (fma.f64 -192 (pow.f64 b 4) (fma.f64 864 (pow.f64 b 4) (fma.f64 768 (pow.f64 b 4) (.f64 (pow.f64 b 4) -1440))))) (fma.f64 4/3 (.f64 b (fma.f64 32/3 (pow.f64 b 3) (fma.f64 -32 (pow.f64 b 3) (fma.f64 256/3 (pow.f64 b 3) (fma.f64 -64 (pow.f64 b 3) (.f64 8 (.f64 (pow.f64 b 3) 0))))))) (.f64 1/3 (+.f64 (.f64 (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 b (.f64 b 0)))) (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12)))) (.f64 (.f64 b 12) (-.f64 (+.f64 (.f64 (pow.f64 b 3) 352/3) (.f64 (pow.f64 b 3) -96)) (fma.f64 1/3 (.f64 b (.f64 12 (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12))))) (.f64 (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 b (.f64 b 0)))) (.f64 b 4/3))))))))) (fma.f64 (pow.f64 y-scale 3) (-.f64 (+.f64 (.f64 (pow.f64 b 3) 352/3) (.f64 (pow.f64 b 3) -96)) (fma.f64 1/3 (.f64 b (.f64 12 (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12))))) (.f64 (fma.f64 -16 (.f64 b b) (fma.f64 32 (.f64 b b) (.f64 b (.f64 b 0)))) (.f64 b 4/3)))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (.f64 b 12))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))
(/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))
(-.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) b)) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) y-scale) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)))))
(+.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))))) (-.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b)))) 2))) 2)))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2) (pow.f64 b 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))))
(-.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) b)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (fma.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)))) (+.f64 (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) y-scale) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))))))
(-.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) (.f64 y-scale (.f64 y-scale (.f64 b b))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (fma.f64 1/16 (/.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) (.f64 b b)))) (.f64 y-scale y-scale)) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (+.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 3))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) b)))) (+.f64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2)))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2) (pow.f64 b 2))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (pow.f64 b 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 (pow.f64 b 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2))))))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 b (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))))) (/.f64 (.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) b)) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) b))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) 1)) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))) 2) (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) 2)))))))))
(-.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) b)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))))) (fma.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)))) (fma.f64 1/16 (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (pow.f64 y-scale 3)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (+.f64 (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (+.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))))) (.f64 1/16 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (.f64 b b)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (+.f64 (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) y-scale) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (*.f64 4 b))))))))))))))))
(-.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 b (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) (.f64 y-scale (.f64 y-scale (.f64 b b))))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))))) (fma.f64 1/16 (/.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) (.f64 b b)))) (.f64 y-scale y-scale)) (fma.f64 1/16 (.f64 (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) (.f64 (pow.f64 y-scale 3) (.f64 b b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (+.f64 (+.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b)))) (.f64 y-scale (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 y-scale 3)) (/.f64 (-.f64 (/.f64 (/.f64 (.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 3/16) (.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (+.f64 (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2)))) (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))) (.f64 (/.f64 (fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) b) (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) b))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))))))) (.f64 1/16 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))) 2) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2) (.f64 b b))))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (pow.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) 2))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))
(/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))
(/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))
(+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b)))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))))))))
(-.f64 (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) y-scale) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (+.f64 (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))))) (.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 3)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2)))))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2)))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2)))))) (pow.f64 y-scale 3))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) b))) (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2))) (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) b)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) 2) (pow.f64 b 2))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (pow.f64 b 3))) (+.f64 (/.f64 (-.f64 (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (+.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b)))) (.f64 1/16 (/.f64 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2)) (.f64 b b))))) (/.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b)))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (.f64 b b)))))) (pow.f64 y-scale 3)) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))))) (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))) (+.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b)))) (+.f64 (/.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (.f64 y-scale y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 (.f64 b b) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))))) (+.f64 (.f64 (/.f64 (-.f64 (-.f64 (/.f64 (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))) (.f64 b b)) (.f64 1/16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (.f64 b b)))))) (.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b)))) (.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))) (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))))))) (pow.f64 y-scale 3)) (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (.f64 y-scale y-scale)) (.f64 b b)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) y-scale) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) (+.f64 (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))))) (.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)))) b)) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))) 2)) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))))) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) b))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2))))))))
(.f64 4 (.f64 y-scale b))
(+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b)))
(fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b)))
(fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (.f64 y-scale b)))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (.f64 y-scale b))))
(fma.f64 (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))))) (.f64 y-scale (.f64 (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 y-scale (.f64 y-scale 24)))) 4/3)))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (*.f64 y-scale b))))
(+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -1728 (pow.f64 y-scale 4)) (+.f64 (.f64 288 (pow.f64 y-scale 4)) (+.f64 (.f64 768 (pow.f64 y-scale 4)) (+.f64 (.f64 -192 (pow.f64 y-scale 4)) (.f64 864 (pow.f64 y-scale 4))))))) (+.f64 (.f64 1/3 (.f64 (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (+.f64 (.f64 4/3 (.f64 y-scale (+.f64 (.f64 256/3 (pow.f64 y-scale 3)) (+.f64 (.f64 -64 (pow.f64 y-scale 3)) (+.f64 (.f64 8 (.f64 y-scale (+.f64 (.f64 8 (pow.f64 y-scale 2)) (.f64 -8 (pow.f64 y-scale 2))))) (+.f64 (.f64 32/3 (pow.f64 y-scale 3)) (.f64 -32 (pow.f64 y-scale 3)))))))) (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))))) (pow.f64 b 4)) (+.f64 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 288 (pow.f64 y-scale 3)) (+.f64 (.f64 -288 (pow.f64 y-scale 3)) (.f64 64 (pow.f64 y-scale 3))))) (+.f64 (.f64 1/3 (.f64 (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale))))) (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 -16 (pow.f64 y-scale 2)) (+.f64 (.f64 8 (pow.f64 y-scale 2)) (+.f64 (.f64 -8 (pow.f64 y-scale 2)) (.f64 32 (pow.f64 y-scale 2))))))))) (pow.f64 b 3)) (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b)))))
(fma.f64 (-.f64 (.f64 1/3 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24)))) (fma.f64 4/3 (.f64 y-scale (fma.f64 256/3 (pow.f64 y-scale 3) (fma.f64 -64 (pow.f64 y-scale 3) (fma.f64 8 (.f64 y-scale (.f64 (.f64 y-scale y-scale) 0)) (.f64 (pow.f64 y-scale 3) -64/3))))) (.f64 1/3 (.f64 (.f64 y-scale 12) (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24)))))))))))) (pow.f64 b 4) (fma.f64 (-.f64 (.f64 1/3 (fma.f64 288 (pow.f64 y-scale 3) (.f64 (pow.f64 y-scale 3) -224))) (fma.f64 1/3 (.f64 (.f64 y-scale 12) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12))))) (.f64 4/3 (.f64 y-scale (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 (.f64 y-scale y-scale) 24))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 1/3 (.f64 (.f64 y-scale y-scale) 48)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
(fma.f64 (-.f64 (.f64 1/3 (fma.f64 -1728 (pow.f64 y-scale 4) (fma.f64 288 (pow.f64 y-scale 4) (fma.f64 768 (pow.f64 y-scale 4) (.f64 (pow.f64 y-scale 4) 672))))) (fma.f64 1/3 (.f64 (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 y-scale (.f64 y-scale 24))))) (fma.f64 4/3 (.f64 y-scale (fma.f64 256/3 (pow.f64 y-scale 3) (fma.f64 -64 (pow.f64 y-scale 3) (fma.f64 8 (.f64 (pow.f64 y-scale 3) 0) (.f64 (pow.f64 y-scale 3) -64/3))))) (.f64 1/3 (.f64 y-scale (.f64 12 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))))) (.f64 y-scale (.f64 (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 y-scale (.f64 y-scale 24)))) 4/3)))))))))) (pow.f64 b 4) (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))))) (.f64 y-scale (.f64 (fma.f64 -16 (.f64 y-scale y-scale) (fma.f64 8 (.f64 y-scale y-scale) (.f64 y-scale (.f64 y-scale 24)))) 4/3)))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (.f64 y-scale b)))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))))
(/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))
(-.f64 (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))
(-.f64 (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) b))))
(+.f64 (.f64 3/4 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) b)) (-.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b))))
(-.f64 (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 b 2)))))))))
(-.f64 (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (+.f64 (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) b)) (+.f64 (/.f64 (.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)))))))))
(-.f64 (fma.f64 3/4 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) b) (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 b b)) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (+.f64 (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b)) (+.f64 (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 1/16 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (/.f64 (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 3) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))))) (+.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 y-scale (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) b)))) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (pow.f64 y-scale 2) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 2))) (+.f64 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) b)) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (+.f64 (/.f64 (.f64 (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 y-scale 2)))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) y-scale))) (/.f64 (.f64 (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2)))) (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 y-scale 2)))))) (+.f64 (.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) y-scale)) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) y-scale)))) (.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (pow.f64 b 3))) (.f64 1/16 (/.f64 (.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (-.f64 (exp.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) 1)) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (+.f64 1 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))) 2) (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) 2) (pow.f64 b 2)))))))))))
(-.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (fma.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (.f64 b (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2))) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (+.f64 (/.f64 (.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (+.f64 (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) b))) (+.f64 (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)) (.f64 (.f64 y-scale y-scale) (.f64 (.f64 b b) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2))))) (.f64 (/.f64 (-.f64 (.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (+.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) (-.f64 (.f64 3/4 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale)))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2))))) (.f64 1/16 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 b 3))))))))
(-.f64 (fma.f64 1/64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 (pow.f64 y-scale 3) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (fma.f64 3/4 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) b) (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 b b)) (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))))) (fma.f64 1/16 (.f64 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))) (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))))) (+.f64 (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) b))) (+.f64 (+.f64 (.f64 1/16 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (/.f64 (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (.f64 (pow.f64 b 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (+.f64 (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)))) (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))))))) (/.f64 (.f64 1/16 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2)) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))) (.f64 y-scale y-scale))))))))) (.f64 (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (.f64 (.f64 b b) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (-.f64 (.f64 3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale) (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))))) (/.f64 (fma.f64 1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2) y-scale) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) y-scale))) (/.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) 2))) 2) (expm1.f64 (.f64 3 (+.f64 (log.f64 (*.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))))))))))))
(/.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))) 2))))
(/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))))) (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))) 2)))))
(+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) b)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (*.f64 y-scale -4)))) 2)))))
(+.f64 (neg.f64 (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) b)) (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) b) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) (.f64 (.f64 y-scale y-scale) (.f64 b b)))) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (+.f64 (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) (.f64 b b))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 1/16 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (.f64 (.f64 y-scale y-scale) (*.f64 b b))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) b) (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 b b)) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (+.f64 (.f64 1/16 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (*.f64 b b))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) b)) (+.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (.f64 1/16 (/.f64 (.f64 (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 3/16 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 (pow.f64 y-scale 2) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2))))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (pow.f64 b 3))) (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (.f64 -3/4 (/.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))))) (/.f64 (.f64 (+.f64 (.f64 -1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) y-scale)) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2) y-scale))) (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) (pow.f64 b 2))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)))) (.f64 1/16 (/.f64 (.f64 (-.f64 (exp.f64 (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) 1) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2)) (.f64 (pow.f64 (+.f64 1 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) (pow.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))) 2))) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) b) (fma.f64 3/16 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) (.f64 (.f64 y-scale y-scale) (.f64 b b)))) (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 (pow.f64 y-scale 3) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (fma.f64 1/16 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (/.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))) (+.f64 (/.f64 (.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 1/16 (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) (.f64 (.f64 y-scale y-scale) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)))))))))) (pow.f64 b 3)) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))))) (+.f64 (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (/.f64 (-.f64 (.f64 -3/4 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))))) (/.f64 (.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2))) (.f64 b b))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 1/16 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))))))))
(-.f64 (fma.f64 -1 (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) b) (fma.f64 3/16 (/.f64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 b b)) (fma.f64 -1 (/.f64 (-.f64 (.f64 -1/64 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 y-scale 3)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))) (fma.f64 1/16 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (-.f64 (.f64 3/16 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (.f64 y-scale y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))) (+.f64 (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))))))) (.f64 (.f64 1/16 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)))))))) (pow.f64 b 3)) (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))))))) (+.f64 (/.f64 1 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (+.f64 (.f64 1/16 (.f64 (/.f64 (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (/.f64 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2) (.f64 y-scale (.f64 y-scale (.f64 b b)))))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (/.f64 (-.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 3) (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) -3/4) (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)))) (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) y-scale) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2)) y-scale)) (pow.f64 (+.f64 1 (+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (pow.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) 2))) 2)) (expm1.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))))) (*.f64 b b))))))
(.f64 12 (.f64 y-scale b))
(.f64 (.f64 y-scale b) 12)
(.f64 y-scale (.f64 b 12))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (.f64 12 (.f64 y-scale b)))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 (*.f64 y-scale b) 12))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (.f64 y-scale (*.f64 b 12)))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (.f64 12 (.f64 y-scale b))))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (.f64 (.f64 y-scale b) 12)))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (.f64 y-scale (.f64 b 12))))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 -192 (.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (fma.f64 12 (.f64 y-scale b) (.f64 -192 (*.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (fma.f64 12 (.f64 y-scale b) (.f64 (pow.f64 y-scale 4) (*.f64 -192 (pow.f64 b 4))))))
(.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b))))
(.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))
(+.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (/.f64 3/4 (*.f64 y-scale b)))
(+.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (/.f64 (/.f64 3/4 b) y-scale))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (.f64 b b)))))
(+.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (*.f64 b b))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (*.f64 b b))))))
(+.f64 (+.f64 (.f64 3 (fma.f64 -1 (neg.f64 (log.f64 y-scale)) (log.f64 (.f64 4 b)))) (/.f64 (/.f64 3/4 b) y-scale)) (+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (.f64 b b))))))
(.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale)))))
(.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (*.f64 -1 (log.f64 (/.f64 -1 y-scale))))))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 3/4 (*.f64 y-scale b)))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 (/.f64 3/4 b) y-scale))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (.f64 b b)))))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (*.f64 b b))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 -4 b)) (.f64 -1 (log.f64 (/.f64 -1 y-scale))))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (/.f64 3/4 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (*.f64 b b))))
(+.f64 (+.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (.f64 b b)))))
(.f64 12 (.f64 y-scale b))
(.f64 (.f64 y-scale b) 12)
(.f64 y-scale (.f64 b 12))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (.f64 12 (.f64 y-scale b)))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 (*.f64 y-scale b) 12))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (.f64 y-scale (*.f64 b 12)))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (.f64 12 (.f64 y-scale b))))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (.f64 (.f64 y-scale b) 12)))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (.f64 y-scale (.f64 b 12))))
(+.f64 (.f64 -24 (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))) (+.f64 (.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (.f64 12 (.f64 y-scale b)) (.f64 -192 (.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(fma.f64 -24 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (fma.f64 12 (.f64 y-scale b) (.f64 -192 (*.f64 (pow.f64 y-scale 4) (pow.f64 b 4))))))
(fma.f64 -24 (.f64 y-scale (.f64 y-scale (.f64 b b))) (fma.f64 64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)) (fma.f64 12 (.f64 y-scale b) (.f64 (pow.f64 y-scale 4) (*.f64 -192 (pow.f64 b 4))))))
(.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b)))))
(.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b)))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (*.f64 -1 (log.f64 (/.f64 1 b))))))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 3/4 (*.f64 y-scale b)))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (/.f64 3/4 b) y-scale))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (.f64 b b)))))
(+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (*.f64 b b))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (.f64 -1 (log.f64 (/.f64 1 b))))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (*.f64 b b))))))
(+.f64 (+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))))) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (.f64 b b)))))
(.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale))))
(.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4))))
(+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))
(+.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (/.f64 3/4 (*.f64 y-scale b)))
(+.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (/.f64 (/.f64 3/4 b) y-scale))
(-.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (.f64 b b)))))
(+.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (*.f64 b b))))))
(-.f64 (+.f64 (.f64 1/64 (/.f64 1 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3)))) (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (.f64 -4 y-scale)))))) (.f64 3/32 (/.f64 1 (*.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))
(+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (/.f64 3/4 (.f64 y-scale b)) (-.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (/.f64 3/32 (.f64 (.f64 y-scale y-scale) (*.f64 b b))))))
(+.f64 (/.f64 1/64 (.f64 (pow.f64 y-scale 3) (pow.f64 b 3))) (+.f64 (.f64 3 (fma.f64 -1 (log.f64 (/.f64 -1 b)) (log.f64 (.f64 y-scale -4)))) (+.f64 (/.f64 (/.f64 3/4 b) y-scale) (/.f64 -3/32 (.f64 y-scale (.f64 y-scale (.f64 b b)))))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(-.f64 (/.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) (/.f64 1 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 1 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 (.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 1) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (.f64 (/.f64 1 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 (/.f64 1 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) (.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2)))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 2))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) 2) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (/.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 1 (neg.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 1 (neg.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))))
(.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 -1 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))))
(.f64 (/.f64 1 (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)))) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 1 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) 2)) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (-.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) 2))) (-.f64 (.f64 4 (.f64 y-scale b)) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (-.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) 2) 2))) (-.f64 (.f64 4 (.f64 y-scale b)) (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) 3))) (+.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (.f64 (pow.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) 2) (-.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2) (.f64 4 (*.f64 y-scale b))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) 2) 3))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (.f64 (pow.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) 2) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (.f64 -4 (.f64 y-scale b))))))
(.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 3) (pow.f64 (pow.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) 2) 3))) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (.f64 (pow.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) 2) (+.f64 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2) (.f64 (.f64 y-scale b) -4)))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 1) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))
(.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(.f64 (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2)))) 2)) (/.f64 (sqrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (cbrt.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) 1) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))
(.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (hypot.f64 (hypot.f64 1 (+.f64 (.f64 4 (.f64 y-scale b)) 1)) (sqrt.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1)))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1)))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)))))
(/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (/.f64 (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))) (/.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (hypot.f64 (hypot.f64 1 (fma.f64 4 (.f64 y-scale b) 1)) (sqrt.f64 (fma.f64 4 (.f64 y-scale b) 1))))))
(.f64 (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (pow.f64 (cbrt.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2)))) 2)) (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (.f64 y-scale b) 1) 2))))) (/.f64 (pow.f64 (cbrt.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) 2) (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))) 2)))
(pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(pow.f64 (sqrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 2)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(pow.f64 (cbrt.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))) 3)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(pow.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 3) 1/3)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(pow.f64 (/.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))) (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) -1)
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(neg.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (neg.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (neg.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b)))))) (neg.f64 (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 2))
(sqrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2)))) 2))
(log.f64 (exp.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(cbrt.f64 (pow.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 3))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(cbrt.f64 (/.f64 (pow.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 3) (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))) 3)))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(expm1.f64 (log1p.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(exp.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(exp.f64 (.f64 (log.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 2))))) 1))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(log1p.f64 (expm1.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2))))))
(/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (fma.f64 4 (.f64 y-scale b) (+.f64 2 (pow.f64 (fma.f64 4 (*.f64 y-scale b) 1) 2))))
(-.f64 (exp.f64 (log1p.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))) 1)
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1)
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(pow.f64 (sqrt.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 2)
(pow.f64 (cbrt.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 3)
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(pow.f64 (pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 3) 1/3)
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(sqrt.f64 (.f64 (pow.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b))) 2) 9))
(log.f64 (pow.f64 (+.f64 (.f64 4 (.f64 y-scale b)) 1) 3))
(.f64 3 (log.f64 (fma.f64 4 (.f64 y-scale b) 1)))
(log.f64 (+.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))) 1))
(log.f64 (+.f64 1 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))
(cbrt.f64 (pow.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 3))
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(expm1.f64 (log1p.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(exp.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(exp.f64 (.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1))
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))
(log1p.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))))
(.f64 3 (log1p.f64 (.f64 4 (*.f64 y-scale b))))

localize107.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	90.5%	(.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
✓	89.8%	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
✓	61.7%	(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
✓	61.5%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 265 to 188 computations (29.1% saved)

series13.0ms (0%)

Counts

4 → 84

Calls

21 calls:

Time	Variable		Point	Expression
2.0ms	a	@	0	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
2.0ms	angle	@	0	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
1.0ms	angle	@	-inf	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
1.0ms	angle	@	inf	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
1.0ms	b	@	0	(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))

rewrite197.0ms (0.2%)

Algorithm

1×	batch-egg-rewrite

Rules

452×	`distribute-rgt-in`
446×	`add-sqr-sqrt`
434×	`*-un-lft-identity`
432×	`pow1`
410×	`add-exp-log`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	22	162
1	453	154
2	5847	154

Stop Event

1×	node limit

Counts

4 → 140

Calls

Call 1

Inputs
(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))
(.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))

Outputs
(((-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 1 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 a (.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 a a) (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 1 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)) (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 1) (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 b) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) 1) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a a) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b))) (.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a b) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a 1) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) b) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a a) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) b) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 1) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) b) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) 1) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) 1) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 a (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 1)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4)))) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (cbrt.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) a)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a a))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 a (sqrt.f64 8))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) (pow.f64 (cbrt.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((neg.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((sqrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (exp.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (/.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((expm1.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log1p.f64 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((pow.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((sqrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (exp.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 a a) 3) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 3) (pow.f64 (.f64 a a) 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 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((exp.f64 (.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) #f)))

simplify585.0ms (0.6%)

Algorithm

1×	egg-herbie

Rules

1442×	`times-frac`
1224×	`associate-r`
944×	`associate-/l*`
922×	`associate-l`
664×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	470	15000
1	1399	14906

Stop Event

1×	node limit

Counts

224 → 240

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 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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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 (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/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b)))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b))))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b)) (.f64 (pow.f64 angle 8) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))) (sqrt.f64 8))) b) (+.f64 (.f64 -1/793437161472000000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 8))) b)) (+.f64 (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b)))))) (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 4))))))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.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 (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 (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 (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 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))
(+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))))
(+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))))) (+.f64 (.f64 (pow.f64 angle 8) (.f64 (pow.f64 a 2) (.f64 (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))) (sqrt.f64 8)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(pow.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)))) 1)
(.f64 a (.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (.f64 a a) (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b))))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) 1)
(.f64 1 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))
(.f64 (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 b))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))
(.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))
(.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)) (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 1) (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2) b))
(.f64 (/.f64 1 b) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a a) 1) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (*.f64 a a) b))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a a))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b))) (.f64 a a))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))) b))
(.f64 (/.f64 a b) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 a 1) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 a (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a a) b) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a a) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a a) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) b))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) b) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 1) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) b))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) b) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) 1) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) b))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) 1) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) a)
(.f64 (/.f64 a (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 8))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 1)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4)))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4)))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (cbrt.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) a)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a a))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 a (sqrt.f64 8))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) (pow.f64 (cbrt.f64 a) 2))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 1)
(pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))) 2)
(pow.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))) 3)
(pow.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 3) 1/3)
(pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) b) -1)
(neg.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 b))))
(sqrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)))
(log.f64 (exp.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)))))
(cbrt.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 3))
(cbrt.f64 (/.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 3)))
(expm1.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(exp.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) 1))
(log1p.f64 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))) 1)
(pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 1)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)
(pow.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) 3)
(pow.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3) 1/3)
(sqrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)))
(log.f64 (exp.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))))
(cbrt.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3))
(cbrt.f64 (.f64 (pow.f64 (.f64 a a) 3) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 3) (pow.f64 (*.f64 a a) 3)))
(expm1.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(exp.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))))))
(exp.f64 (.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))) 1))
(log1p.f64 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))

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 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 angle 1/180))
(.f64 angle (.f64 (PI.f64) 1/180))
(+.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 (PI.f64) (*.f64 angle 1/180)))
(fma.f64 (PI.f64) (.f64 angle 1/180) (.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 (PI.f64) (.f64 angle 1/180) (.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 (PI.f64) (.f64 angle 1/180) (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))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b))
(/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b)
(.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b)))
(fma.f64 (pow.f64 angle 4) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000) (/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) (.f64 1/6298560000 (pow.f64 angle 4))))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b))))
(fma.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000)) (.f64 1/816293376000000 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 6)) b)))) (fma.f64 (pow.f64 angle 4) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000) (/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (*.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b)))
(fma.f64 (pow.f64 angle 6) (-.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (sqrt.f64 8)))) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) 1/6298560000)) (/.f64 (.f64 1/816293376000000 (.f64 a a)) (/.f64 (/.f64 b (pow.f64 (PI.f64) 6)) (sqrt.f64 8))))) (fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) (*.f64 1/6298560000 (pow.f64 angle 4)))))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))) b)) (.f64 (pow.f64 angle 8) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))) (sqrt.f64 8))) b) (+.f64 (.f64 -1/793437161472000000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 8))) b)) (+.f64 (.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) b) (+.f64 (.f64 -1/64800 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 2))) (.f64 1/816293376000000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 6))) b)))))) (.f64 1/25194240000 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b)) (.f64 -1/2099520000 (/.f64 (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))) b))) (pow.f64 (PI.f64) 4))))))))))
(fma.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000)) (.f64 1/816293376000000 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 6)) b)))) (fma.f64 (pow.f64 angle 4) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000) (fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 b (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 angle 8) (-.f64 (/.f64 (.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000)) (sqrt.f64 8)) b) (fma.f64 -1/793437161472000000000 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 8)) b) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) b) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (.f64 a a)) b) 1/6298560000)) (.f64 1/816293376000000 (/.f64 (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 6)) b))))) (.f64 1/25194240000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (/.f64 (.f64 (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)) (*.f64 a a)) b) 1/6298560000))))))))))
(fma.f64 (pow.f64 angle 6) (-.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (sqrt.f64 8)))) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) 1/6298560000)) (/.f64 (.f64 1/816293376000000 (.f64 a a)) (/.f64 (/.f64 b (pow.f64 (PI.f64) 6)) (sqrt.f64 8))))) (fma.f64 (pow.f64 angle 4) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) 1/6298560000) (fma.f64 (pow.f64 angle 8) (-.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000))) (fma.f64 -1/793437161472000000000 (.f64 (.f64 (/.f64 a b) a) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 8))) (fma.f64 (.f64 -1/64800 (pow.f64 (PI.f64) 2)) (-.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (sqrt.f64 8)))) (fma.f64 -1/64800 (.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) 1/6298560000)) (/.f64 (.f64 1/816293376000000 (.f64 a a)) (/.f64 (/.f64 b (pow.f64 (PI.f64) 6)) (sqrt.f64 8))))) (.f64 1/25194240000 (.f64 (.f64 (.f64 (/.f64 a b) a) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))) (.f64 1/6298560000 (pow.f64 (PI.f64) 4))))))) (.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8)))))))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.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 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))) (.f64 b (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2)))))
(.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2))))
(.f64 1/32400 (.f64 angle (.f64 angle (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8)))))))
(+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))
(fma.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (.f64 (pow.f64 angle 4) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))))
(fma.f64 (.f64 (.f64 angle angle) 1/32400) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8)))) (.f64 (pow.f64 angle 4) (.f64 (.f64 -1/3149280000 (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))))
(+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4)))))))
(fma.f64 (pow.f64 angle 6) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (fma.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (.f64 (pow.f64 angle 4) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))))))
(fma.f64 (pow.f64 angle 6) (.f64 (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 a (.f64 a (sqrt.f64 8)))) (fma.f64 (.f64 (.f64 angle angle) 1/32400) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8)))) (.f64 (pow.f64 angle 4) (.f64 (.f64 -1/3149280000 (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8))))))
(+.f64 (.f64 (pow.f64 angle 6) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))))) (+.f64 (.f64 (pow.f64 angle 8) (.f64 (pow.f64 a 2) (.f64 (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8))) (sqrt.f64 8)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (.f64 -1/3149280000 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 4))))))))
(fma.f64 (pow.f64 angle 6) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (fma.f64 (pow.f64 angle 8) (.f64 (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000)) (sqrt.f64 8)) (fma.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (.f64 (pow.f64 angle 4) (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))))))
(fma.f64 (pow.f64 angle 6) (.f64 (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 a (.f64 a (sqrt.f64 8)))) (fma.f64 (pow.f64 angle 8) (.f64 (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000) (.f64 a (.f64 a (sqrt.f64 8)))) (fma.f64 (.f64 (.f64 angle angle) 1/32400) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8)))) (.f64 (pow.f64 angle 4) (.f64 (.f64 -1/3149280000 (.f64 a a)) (.f64 (pow.f64 (PI.f64) 4) (sqrt.f64 8)))))))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(.f64 (pow.f64 a 2) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (*.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (*.f64 a (sqrt.f64 8))))
(-.f64 (exp.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 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 (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 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.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 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (sqrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))
(fabs.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log.f64 (+.f64 1 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (.f64 (log.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 1 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 3)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3) 1/3)
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(fabs.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log.f64 (exp.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 1))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sin.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(-.f64 (exp.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)))) 1)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 a (.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (.f64 a a) (.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (.f64 a a) (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (.f64 a a) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) 1)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 1 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))) 2)
(pow.f64 (.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (cbrt.f64 (/.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4))) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (cbrt.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2) (pow.f64 a 4)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 4)))))
(.f64 (cbrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (cbrt.f64 (/.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4))) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (cbrt.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2) (pow.f64 a 4)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 4)))))
(.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 1 b))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)) (/.f64 (.f64 a a) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))))
(.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)) (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (neg.f64 b)))
(/.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (neg.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 1) (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2) b))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 b) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))) 2)
(pow.f64 (.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(/.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2)))
(.f64 (/.f64 (.f64 a a) 1) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (*.f64 a a) b))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (sqrt.f64 8) (/.f64 (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b))) (.f64 a a))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 1 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)) (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (neg.f64 b)))
(/.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (neg.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))) b))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 a b) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 a 1) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 a (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (sqrt.f64 8) (/.f64 (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 a (/.f64 (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 a a) b) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a a) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (sqrt.f64 8) (/.f64 (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 a a) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 a (/.f64 (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a a) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 a (/.f64 (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) b))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) b) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 1) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(/.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2)))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) b))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) b) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) 1) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))) (/.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2))))
(/.f64 (.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4))))) (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 2)))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2) b))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) b) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) 1) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 (sqrt.f64 8) (/.f64 (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (.f64 a a) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (cbrt.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) 2))) (/.f64 a (/.f64 (cbrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (/.f64 a (cbrt.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 a (sqrt.f64 8))) (cbrt.f64 (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))))
(.f64 (/.f64 a (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) a)
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 a (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a a) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (neg.f64 b))) (neg.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a (neg.f64 b))) (.f64 (sqrt.f64 8) (neg.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2))))
(.f64 (.f64 (/.f64 a (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a (neg.f64 b)))) (neg.f64 (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))) (sqrt.f64 8))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 1)) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4)))) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4)))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 (.f64 a a) (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (cbrt.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))
(.f64 (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 a b)) (cbrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4)))) (cbrt.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2))))
(.f64 (.f64 a (/.f64 a (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 (cbrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (cbrt.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) a)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a a))) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))) (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 1 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (.f64 a (.f64 a (sqrt.f64 8))))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(.f64 (/.f64 (cbrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(.f64 (cbrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4)))) (.f64 (/.f64 1 (.f64 b (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (pow.f64 8 1/4))) 2))))
(.f64 (cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4)))) (/.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (sqrt.f64 8) b)))) (pow.f64 (cbrt.f64 a) 2))
(/.f64 (.f64 (cbrt.f64 (pow.f64 a 4)) (pow.f64 (cbrt.f64 a) 2)) (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (sqrt.f64 8) b))))
(.f64 (/.f64 (cbrt.f64 (pow.f64 a 4)) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) (/.f64 (sqrt.f64 8) b)) (pow.f64 (cbrt.f64 a) 2)))
(.f64 (/.f64 (.f64 a (.f64 a (sqrt.f64 8))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))
(.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 (/.f64 a (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (/.f64 a b)) (sqrt.f64 8)))
(.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (.f64 a (sqrt.f64 8)) (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a b))))
(pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 1)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))) 2)
(pow.f64 (/.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) (sqrt.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))) 2)
(pow.f64 (.f64 (/.f64 a (sqrt.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))) (.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (cbrt.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))) 3)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(pow.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 3) 1/3)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(pow.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) b) -1)
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(neg.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (neg.f64 b))))
(.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)) (/.f64 (/.f64 1 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) (neg.f64 b)))
(/.f64 (neg.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)) (.f64 b (neg.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(sqrt.f64 (/.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 2)))
(sqrt.f64 (/.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4))) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(sqrt.f64 (/.f64 8 (/.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2) (pow.f64 a 4)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 4))))
(log.f64 (exp.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(log.f64 (+.f64 1 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(cbrt.f64 (pow.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b)) 3))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(cbrt.f64 (/.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) 3)))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(expm1.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(exp.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(exp.f64 (.f64 (log.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) 1))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(log1p.f64 (expm1.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))))
(/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2) (.f64 b (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))) 1)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 1)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (cbrt.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)) 3)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3) 1/3)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(sqrt.f64 (.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (pow.f64 a 4)))
(sqrt.f64 (.f64 8 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 a 4))))
(sqrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 8 (pow.f64 a 4))))
(log.f64 (exp.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(cbrt.f64 (pow.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) 3))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(cbrt.f64 (.f64 (pow.f64 (.f64 a a) 3) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 a a) 3) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)) 3)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) 3) (pow.f64 (*.f64 a a) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 a a) 3) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)) 3)))
(cbrt.f64 (.f64 (pow.f64 a 6) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) 3)))
(expm1.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(exp.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (pow.f64 8 1/4))))))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(exp.f64 (.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))))) 1))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)
(log1p.f64 (expm1.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2)))
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2)
(pow.f64 (.f64 a (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 8 1/4))) 2)

eval1.4s (1.3%)

Compiler: Compiled 66728 to 50065 computations (25% saved)

prune630.0ms (0.6%)

Pruning

193 alts after pruning (187 fresh and 6 done)

	Pruned	Kept	Total
New	1027	47	1074
Fresh	15	140	155
Picked	1	0	1
Done	1	6	7
Total	1044	193	1237

Accurracy

54.1%

Counts

1237 → 193

Alt Table

Click to see full alt table

Status	Accuracy	Program
	16.5%	(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
	6.9%	(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
	11.9%	(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
	7.8%	(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
	1.7%	(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
	11.9%	(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))
	9.8%	(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 angle angle) b) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 b (sqrt.f64 2))) (.f64 (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
	6.9%	(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
	0.3%	(/.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)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (/.f64 (.f64 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	1.9%	(/.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)) (+.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 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
	2.9%	(+.f64 (.f64 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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)))))
	3.9%	(.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)))))
	4.5%	(.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))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	2.6%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	3.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (.f64 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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)))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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 1 2) (.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)))))
	3.5%	(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.1%	(.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)))
	7.5%	(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
	16.2%	(.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
	10.3%	(.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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)))))
	6.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
	4.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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)))))
	4.9%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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))))
	4.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))))
	4.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
	11.5%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
	6.1%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
	11.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
	5.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) a))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.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))))))))))
	3.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
	8.7%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale)))))
	6.2%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
	2.4%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (sqrt.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 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (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))))))))))
	4.5%	(.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)))))))
	4.9%	(.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 angle (.f64 1/180 (PI.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.9%	(.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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
	7.6%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
	9.3%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
	6.8%	(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
	4.5%	(.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)))))))
	10.4%	(.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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
	10.3%	(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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))))))
	4.7%	(.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)))))))
	7.1%	(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	4.5%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) 3) 1/3))
✓	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3) 3) 1/3))
	4.3%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3)) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b (pow.f64 64 1/3)) 3) 1/3))
	5.2%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3))
	7.8%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (sqrt.f64 (.f64 (.f64 b b) 16)) 3) 1/3))
	4.4%	(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (exp.f64 (log.f64 (*.f64 b 4))) 3) 1/3))
	17.9%	(.f64 (.f64 1/4 y-scale) (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))) 3))
	9.5%	(.f64 (.f64 1/4 y-scale) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4)))))))
	8.0%	(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
	17.9%	(.f64 (.f64 1/4 y-scale) (.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2))))
✓	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
	17.9%	(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
	5.2%	(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6)))
	9.5%	(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
	14.0%	(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
	15.6%	(.f64 (.f64 1/4 y-scale) (.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4))))))
	18.0%	(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
	9.5%	(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
	3.1%	(.f64 (.f64 1/4 y-scale) (log.f64 (exp.f64 (*.f64 b 4))))
	8.3%	(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 b 4))))
	10.4%	(.f64 (.f64 1/4 y-scale) (cbrt.f64 (pow.f64 (*.f64 b 4) 3)))
	4.0%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) x-scale))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	2.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.3%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (.f64 b (sqrt.f64 2)))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (.f64 2 (+.f64 (.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)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	1.3%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
	3.9%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.8%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
	3.6%	(.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)))))))
	6.5%	(.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.9%	(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	11.6%	(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
	11.6%	(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
	8.1%	(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
	13.7%	(.f64 1/4 (fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) -1))
	7.4%	(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
	7.1%	(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
	16.8%	(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	7.1%	(.f64 1/4 (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
	8.5%	(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (*.f64 y-scale b))))
	9.7%	(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
	12.4%	(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (*.f64 b 12)))))))
	11.5%	(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
	7.1%	(.f64 1/4 (pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3) 1/3))
	7.1%	(.f64 1/4 (pow.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3) 1/3))
	17.5%	(.f64 1/4 (pow.f64 (.f64 (sqrt.f64 (*.f64 y-scale b)) 2) 2))
	18.0%	(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
	0.8%	(.f64 1/4 (/.f64 (expm1.f64 (+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (/.f64 3/4 b) y-scale))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
	0.8%	(.f64 1/4 (/.f64 (expm1.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
	1.6%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3) 2)))))
	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)))))
	10.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (sqrt.f64 (exp.f64 2)) (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))))
	7.9%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 1 2)))))
	8.0%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) 8))))))
	2.2%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
	2.4%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))))))
	9.7%	(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
	9.1%	(.f64 1/4 (/.f64 (expm1.f64 (exp.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
	18.2%	(.f64 1/4 (/.f64 1 (/.f64 1 (.f64 4 (*.f64 y-scale b)))))
	13.7%	(.f64 1/4 (-.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 3) 1))
✓	13.9%	(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
	8.9%	(.f64 1/4 (-.f64 (.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1))
	20.3%	(.f64 1/4 (-.f64 (fabs.f64 (fma.f64 y-scale (.f64 4 b) 1)) 1))
	3.9%	(*.f64 1/4 (-.f64 1 1))
	8.4%	(.f64 1/4 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b))))
	16.6%	(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
	9.7%	(.f64 1/4 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b))))))
	1.3%	(.f64 1/4 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))
	17.9%	(.f64 1/4 (.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (*.f64 y-scale b)))))
	10.0%	(.f64 1/4 (.f64 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1))
	18.0%	(.f64 1/4 (.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 4 y-scale)) (cbrt.f64 b)))
	7.1%	(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	6.2%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
	17.9%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	17.9%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	7.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	13.3%	(.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)))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
	9.4%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (sqrt.f64 8))))))))))
	17.9%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
	9.5%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
	3.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
	8.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
	27.6%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3))))
	8.6%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (/.f64 (neg.f64 (pow.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))) 3)) (.f64 8 (pow.f64 (.f64 y-scale b) 2))))))
	27.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))))
✓	27.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
	27.8%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))))
	11.0%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))))
	11.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8)))))))
	17.1%	(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	16.3%	(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
	3.5%	(.f64 1/4 (.f64 y-scale (.f64 (.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)))))))))
	5.0%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	4.6%	(.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	10.3%	(.f64 1/4 (.f64 y-scale (.f64 (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))))))))
	7.4%	(.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)))))))))
	13.4%	(.f64 1/4 (.f64 x-scale (.f64 (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))))))))
	6.4%	(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
✓	18.2%	(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
	27.6%	(.f64 1/4 (fabs.f64 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3)))
	20.4%	(.f64 1/4 (fabs.f64 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1)))
✓	28.0%	(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
	11.1%	(.f64 1/4 (fabs.f64 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3))))
	16.4%	(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
	7.6%	(.f64 1/4 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3)))
	7.3%	(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
	12.1%	(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	12.1%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
	6.5%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
	10.5%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (.f64 (PI.f64) (.f64 angle 1/180)) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	10.2%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (+.f64 1 (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2))) b) (sqrt.f64 8)))))
	12.1%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.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))) b) (sqrt.f64 8)))))
	12.0%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) b) (sqrt.f64 8)))))
	12.0%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) b) (sqrt.f64 8)))))
	12.0%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) b) (sqrt.f64 8)))))
	12.1%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1 b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	6.6%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	10.5%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b)) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	12.1%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (expm1.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
	8.2%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (exp.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4)))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	12.1%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 a (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	10.4%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
	11.9%	(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (expm1.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
	12.6%	(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
	12.6%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
	8.1%	(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
	8.1%	(.f64 -1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 a (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
	5.7%	(.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))
	12.6%	(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
	6.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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))
	5.1%	(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
	3.5%	(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
	6.6%	(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))

Compiler

Compiled 8598 to 6581 computations (23.5% saved)

regimes3.1s (3%)

Counts

270 → 4

Calls

Call 1

Inputs
(*.f64 1/4 (-.f64 1 1))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
(.f64 1/4 (/.f64 1 (/.f64 1 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
(.f64 1/4 (fabs.f64 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1)))
(.f64 1/4 (-.f64 (.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (*.f64 b 12)))))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (expm1.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (log.f64 (exp.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 b 4))))
(.f64 (.f64 1/4 y-scale) (log.f64 (exp.f64 (*.f64 b 4))))
(.f64 1/4 (cbrt.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
(.f64 1/4 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3)))
(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
(.f64 1/4 (pow.f64 (sqrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
(.f64 1/4 (pow.f64 (.f64 (sqrt.f64 (*.f64 y-scale b)) 2) 2))
(.f64 (.f64 1/4 y-scale) (cbrt.f64 (pow.f64 (*.f64 b 4) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))
(.f64 1/4 (-.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
(.f64 1/4 (-.f64 (fabs.f64 (fma.f64 y-scale (.f64 4 b) 1)) 1))
(.f64 1/4 (pow.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64) 1/3))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale b) (sqrt.f64 8)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(.f64 1/4 (fabs.f64 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3))))
(.f64 1/4 (fabs.f64 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))))
(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
(.f64 1/4 (.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 4 y-scale)) (cbrt.f64 b)))
(.f64 1/4 (-.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 3) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b (pow.f64 64 1/3)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (sqrt.f64 (.f64 (.f64 b b) 16)) 3) 1/3))
(.f64 1/4 (.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/2) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4))))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6)))
(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (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 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1))
(.f64 1/4 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b))))))
(.f64 1/4 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
(.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) (pow.f64 (pow.f64 (exp.f64 (log.f64 (*.f64 b 4))) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 b)) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 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 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) b))) 1) (sqrt.f64 2)))
(.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))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) 3) 1/3))
(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.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 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))
(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8)))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (/.f64 (neg.f64 (pow.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))) 3)) (.f64 8 (pow.f64 (.f64 y-scale b) 2))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 1 2)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)) 3) 1/3))
(.f64 1/4 (fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) -1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3)) 3) 1/3))
(.f64 1/4 (/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
(.f64 1/4 (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
(.f64 (.f64 1/4 y-scale) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4)))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (.f64 b (sqrt.f64 2)))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (sqrt.f64 (exp.f64 2)) (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 (expm1.f64 (+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (/.f64 3/4 b) y-scale))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b)) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 1/4 (/.f64 (expm1.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (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 2 (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.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 angle (.f64 1/180 (PI.f64)))) 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 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 (exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (exp.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (.f64 x-scale (.f64 (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 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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.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 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 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 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 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2))))) (pow.f64 (.f64 y-scale x-scale) 2)) x-scale))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) x-scale))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 1 b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (.f64 2 (+.f64 (.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)))))))) (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 2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 (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 (sqrt.f64 8) (.f64 y-scale x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 x-scale b) (.f64 (fma.f64 1/32400 (.f64 (.f64 a (/.f64 a (.f64 x-scale x-scale))) (pow.f64 (PI.f64) 2)) (/.f64 (.f64 (.f64 -1/32400 (.f64 b b)) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 angle angle) (sqrt.f64 2)))) (.f64 (/.f64 (sqrt.f64 2) x-scale) b)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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))))
(.f64 (sqrt.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 a (.f64 a (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 (sqrt.f64 2) y-scale))))
(.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 2) y-scale) (sqrt.f64 8))) (sqrt.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 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) 1)
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 angle angle) (fma.f64 1/16200 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/16200 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8)) b)) (.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 2) (*.f64 (sqrt.f64 8) b))))
(exp.f64 (log.f64 (.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))) (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) 1/4)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (.f64 (PI.f64) (.f64 angle 1/180)) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 a (/.f64 (.f64 x-scale x-scale) a))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (/.f64 b (/.f64 x-scale (/.f64 b x-scale))))))))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b) x-scale)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) a))) (.f64 1/2 (/.f64 (.f64 (.f64 (sqrt.f64 2) (.f64 b b)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 x-scale a) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (-.f64 (.f64 (/.f64 (.f64 -1/2 (sqrt.f64 2)) (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 x-scale a)) (.f64 b b))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) a))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 angle angle) (sqrt.f64 8)) (fma.f64 -1/16200 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/16200 (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)))))) (.f64 b (sqrt.f64 2))) (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (*.f64 (sqrt.f64 8) b))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b (sqrt.f64 8))))) (+.f64 1 (+.f64 (exp.f64 (log1p.f64 (.f64 b (sqrt.f64 8)))) (pow.f64 (exp.f64 2) (log1p.f64 (*.f64 b (sqrt.f64 8))))))))))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (log.f64 (exp.f64 (sqrt.f64 (.f64 2 (+.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))))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 a (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 b b) (.f64 (sqrt.f64 8) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 8)))))
(.f64 1/4 (+.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))
(expm1.f64 (log1p.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (exp.f64 (log.f64 (sqrt.f64 (.f64 2 (+.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale x-scale))))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (sqrt.f64 (+.f64 (.f64 2 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 1/2 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 b b)) x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (+.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/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (fma.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (.f64 a a)) (.f64 b x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))))) -1/2 (/.f64 (neg.f64 (sqrt.f64 2)) (/.f64 (/.f64 x-scale b) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (+.f64 1 (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2))) b) (sqrt.f64 8)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2))) x-scale) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 -1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) a)) (.f64 y-scale (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (*.f64 (sqrt.f64 8) (sqrt.f64 2))))))
(.f64 1/4 (fma.f64 y-scale (.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2))) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (/.f64 (sqrt.f64 8) b)))))
(.f64 1/4 (fma.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (/.f64 (sqrt.f64 8) b)) (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.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/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (exp.f64 (.f64 2 (log.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4)))))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) a) (/.f64 (.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(fma.f64 -1/8 (.f64 (/.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8))) (/.f64 b y-scale))) (.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8))))
(fma.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (sqrt.f64 8)))) (/.f64 (.f64 (.f64 1/8 (.f64 (sqrt.f64 2) y-scale)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (.f64 a a) (sqrt.f64 8)))) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) b)))
(+.f64 (.f64 -1/8 (/.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/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))))
(.f64 1/4 (.f64 y-scale (.f64 (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 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 b b))))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (expm1.f64 (log1p.f64 (/.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (expm1.f64 (log1p.f64 (pow.f64 (.f64 a (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (pow.f64 8 1/4))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (exp.f64 (log.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (expm1.f64 (log1p.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (log.f64 (exp.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 3)) b) (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 (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))))))) (neg.f64 (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 (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 (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)) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))) (/.f64 (.f64 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 a a) (.f64 (sqrt.f64 8) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.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))) b) (sqrt.f64 8)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (.f64 1/2 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(fma.f64 1/8 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 angle angle) b) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))))) (fma.f64 1/8 (.f64 (/.f64 y-scale (.f64 b (sqrt.f64 2))) (.f64 (-.f64 (fma.f64 2 (.f64 b (.f64 b (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 4) -1/1574640000))) (pow.f64 (.f64 (/.f64 1/2 (.f64 b (sqrt.f64 2))) (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a)))) 2)) (.f64 (pow.f64 angle 4) (sqrt.f64 8)))) (.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
(fma.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/8 (.f64 (/.f64 (.f64 x-scale x-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))) (.f64 y-scale (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))))))
(fma.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 (sqrt.f64 8) (.f64 y-scale b))) (.f64 (.f64 1/8 (/.f64 x-scale (/.f64 (sqrt.f64 2) x-scale))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 (.f64 x-scale x-scale) 1/2) (/.f64 (/.f64 (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)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) 2))) (/.f64 (.f64 y-scale (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (.f64 b (sqrt.f64 8))))))
(/.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)) (+.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 4 (.f64 (.f64 b a) (.f64 b (neg.f64 a)))) (pow.f64 (.f64 x-scale y-scale) 2)))
(+.f64 (.f64 -1/32 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 4) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (sqrt.f64 8))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 3) (pow.f64 b 3)))) (+.f64 (.f64 1/8 (/.f64 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 (pow.f64 a 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (sqrt.f64 8))))) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b))) (.f64 1/4 (.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/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 b (sqrt.f64 8)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-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)))) 2) (/.f64 (.f64 y-scale y-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 x-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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 1 2) (.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/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 (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 (.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 (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 (.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 (.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 y-scale x-scale) (sqrt.f64 8))) (sqrt.f64 (+.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 (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))))))) (+.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 a a) (/.f64 (.f64 x-scale x-scale) (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))) (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 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (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)))))
(.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 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (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 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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/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)))))))
(cbrt.f64 (.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2))))) (.f64 -1/4 (.f64 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))) (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 (.f64 2 (+.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)))) x-scale) (neg.f64 (pow.f64 (.f64 y-scale x-scale) 2)))))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (+.f64 (/.f64 (.f64 (sqrt.f64 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) x-scale) (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (pow.f64 (sin.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (sqrt.f64 2) (.f64 (pow.f64 y-scale 2) (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.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))))) (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 (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 1/8 (/.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 2) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))))))) (.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 4) (.f64 (-.f64 (+.f64 (.f64 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/1574640000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale (+.f64 (.f64 -1/16200 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/16200 (/.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 1/4 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (/.f64 (pow.f64 (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (.f64 -1/2 (/.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b)))))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 2) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))
(.f64 1/4 (+.f64 (neg.f64 (/.f64 (-.f64 (.f64 -3/4 (/.f64 (/.f64 (pow.f64 (exp.f64 3) (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))))) b)) (/.f64 (.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (fma.f64 -1/4 (/.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) b) (/.f64 (.f64 -1/2 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2)) b))) (pow.f64 (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))) 2))) y-scale)) (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (pow.f64 (exp.f64 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))) 2) (+.f64 1 (exp.f64 (+.f64 (log.f64 (*.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale))))))))))
(fma.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/8 (.f64 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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/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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 y-scale (/.f64 x-scale (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (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 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (/.f64 (.f64 y-scale y-scale) (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 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 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 b b) (/.f64 (.f64 y-scale y-scale) (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 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 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 (/.f64 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 -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)))) (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 4 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (/.f64 (/.f64 (.f64 x-scale x-scale) (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 (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/2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))))))))
(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))))))))
(fma.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.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 (.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 angle (.f64 1/180 (PI.f64)))) 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 (.f64 x-scale (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 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (+.f64 a b) 2))))) (.f64 -2 (.f64 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 a a) (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.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 angle (.f64 1/180 (PI.f64)))) 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 (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/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 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (.f64 (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (cbrt.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 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2) (pow.f64 (.f64 x-scale y-scale) 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 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/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 (/.f64 x-scale (/.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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)))))) 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 (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 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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 (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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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))))))) (.f64 -1/2 (/.f64 (-.f64 (.f64 1/2 (/.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 -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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 1/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 (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 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 (fma.f64 b b (neg.f64 (.f64 a a))) 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 (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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 (fma.f64 b b (neg.f64 (.f64 a a))) 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)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 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))))))))))))))))

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

Calls

8 calls:

898.0ms	b
695.0ms	y-scale
332.0ms	x-scale
203.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
194.0ms	(/.f64 angle 180)

Results

Accuracy	Segments	Branch
28.0%	1	`a`
31.8%	5	`b`
28.0%	1	`angle`
32.1%	2	`x-scale`
33.1%	4	`y-scale`
28.0%	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)))
28.0%	1	`(*.f64 (/.f64 angle 180) (PI.f64))`
28.0%	1	`(/.f64 angle 180)`

Compiler

Compiled 14964 to 9764 computations (34.8% saved)

bsearch855.0ms (0.8%)

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
260.0ms	3.9268971379964955e-148	1.8716829968019413e-145
214.0ms	-5.07737150178004e-200	-7.29956999453885e-201
374.0ms	-1.9553766748583252e+90	-2.3455954863775998e+85

Results

394.0ms	84×	body	1024	valid
260.0ms	247×	body	256	valid
69.0ms	29×	body	512	valid
64.0ms	8×	body	2048	valid
15.0ms	3×	body	1024	infinite
11.0ms	11×	body	256	infinite
5.0ms	2×	body	512	infinite

Compiler

Compiled 1411 to 1120 computations (20.6% saved)

regimes979.0ms (0.9%)

Counts

165 → 2

Calls

Call 1

Inputs
(*.f64 1/4 (-.f64 1 1))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
(.f64 1/4 (/.f64 1 (/.f64 1 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
(.f64 1/4 (fabs.f64 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1)))
(.f64 1/4 (-.f64 (.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (*.f64 b 12)))))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (expm1.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (log.f64 (exp.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 b 4))))
(.f64 (.f64 1/4 y-scale) (log.f64 (exp.f64 (*.f64 b 4))))
(.f64 1/4 (cbrt.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
(.f64 1/4 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3)))
(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
(.f64 1/4 (pow.f64 (sqrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
(.f64 1/4 (pow.f64 (.f64 (sqrt.f64 (*.f64 y-scale b)) 2) 2))
(.f64 (.f64 1/4 y-scale) (cbrt.f64 (pow.f64 (*.f64 b 4) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))
(.f64 1/4 (-.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
(.f64 1/4 (-.f64 (fabs.f64 (fma.f64 y-scale (.f64 4 b) 1)) 1))
(.f64 1/4 (pow.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64) 1/3))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale b) (sqrt.f64 8)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(.f64 1/4 (fabs.f64 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3))))
(.f64 1/4 (fabs.f64 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))))
(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
(.f64 1/4 (.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 4 y-scale)) (cbrt.f64 b)))
(.f64 1/4 (-.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 3) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b (pow.f64 64 1/3)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (sqrt.f64 (.f64 (.f64 b b) 16)) 3) 1/3))
(.f64 1/4 (.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/2) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4))))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6)))
(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (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 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1))
(.f64 1/4 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b))))))
(.f64 1/4 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
(.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) (pow.f64 (pow.f64 (exp.f64 (log.f64 (*.f64 b 4))) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 b)) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 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 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) b))) 1) (sqrt.f64 2)))
(.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))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) 3) 1/3))
(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.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 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))
(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8)))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (/.f64 (neg.f64 (pow.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))) 3)) (.f64 8 (pow.f64 (.f64 y-scale b) 2))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 1 2)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)) 3) 1/3))
(.f64 1/4 (fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) -1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3)) 3) 1/3))
(.f64 1/4 (/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
(.f64 1/4 (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
(.f64 (.f64 1/4 y-scale) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4)))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (.f64 b (sqrt.f64 2)))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))
(.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (sqrt.f64 (pow.f64 (exp.f64 4) (log1p.f64 (.f64 y-scale (.f64 b 4)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (E.f64) (log1p.f64 (.f64 y-scale (.f64 b 4)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (sqrt.f64 (exp.f64 2)) (.f64 2 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (*.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (+.f64 (log.f64 (.f64 b -4)) (neg.f64 (log.f64 (/.f64 -1 y-scale)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
(.f64 (.f64 1/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (.f64 2 (+.f64 (.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 (expm1.f64 (+.f64 (.f64 3 (+.f64 (log.f64 (.f64 4 y-scale)) (neg.f64 (neg.f64 (log.f64 b))))) (/.f64 (/.f64 3/4 b) y-scale))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 2)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) b) (.f64 (pow.f64 (PI.f64) 2) (.f64 a (.f64 a (sqrt.f64 8))))))) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 -1/4 (+.f64 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (.f64 1/32400 (.f64 (.f64 angle angle) (.f64 (.f64 a (.f64 a (sqrt.f64 8))) (pow.f64 (PI.f64) 2)))) b)) (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) (sqrt.f64 8)))))
(.f64 1/4 (/.f64 (expm1.f64 (+.f64 (.f64 3/4 (/.f64 1 (.f64 y-scale b))) (.f64 3 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (.f64 4 b)))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (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 2 (+.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 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.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 angle (.f64 1/180 (PI.f64)))) 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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 angle (.f64 1/180 (PI.f64)))) 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 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 angle (.f64 1/180 (PI.f64)))) 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 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 (exp.f64 (log.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 y-scale (.f64 b 4))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (exp.f64 (log.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))

Outputs

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

(*.f64 1/4 (fabs.f64 (*.f64 4 (*.f64 y-scale b))))

Calls

5 calls:

303.0ms	b
189.0ms	y-scale
146.0ms	x-scale
87.0ms	angle
87.0ms	a

Results

Accuracy	Segments	Branch
28.0%	1	`a`
30.2%	3	`b`
28.0%	1	`angle`
28.0%	1	`x-scale`
30.6%	2	`y-scale`

Compiler

Compiled 3819 to 2708 computations (29.1% saved)

bsearch402.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
400.0ms	-1.9553766748583252e+90	-2.3455954863775998e+85

Results

203.0ms	35×	body	1024	valid
100.0ms	97×	body	256	valid
28.0ms	6×	body	1024	infinite
24.0ms	9×	body	512	valid
19.0ms	3×	body	2048	valid
14.0ms	13×	body	256	infinite
8.0ms	3×	body	512	infinite

Compiler

Compiled 655 to 518 computations (20.9% saved)

regimes476.0ms (0.5%)

Counts

139 → 1

Calls

Call 1

Inputs
(*.f64 1/4 (-.f64 1 1))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
(.f64 1/4 (/.f64 1 (/.f64 1 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 (.f64 1/4 y-scale) (sqrt.f64 (.f64 (.f64 b b) 16)))
(.f64 1/4 (fabs.f64 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1)))
(.f64 1/4 (-.f64 (.f64 (/.f64 1 (+.f64 1 (.f64 b (.f64 y-scale -4)))) (+.f64 1 (.f64 (pow.f64 (.f64 y-scale b) 2) -16))) 1))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (*.f64 b 12))))))))
(.f64 1/4 (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 -4/3 b) (*.f64 b 12)))))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 y-scale y-scale) 16) (.f64 (.f64 -4/3 y-scale) (.f64 y-scale 12))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (exp.f64 (log.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (expm1.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (log.f64 (exp.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (exp.f64 (log.f64 (*.f64 b 4))))
(.f64 (.f64 1/4 y-scale) (log.f64 (exp.f64 (*.f64 b 4))))
(.f64 1/4 (cbrt.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64)))
(.f64 1/4 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3)))
(.f64 1/4 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3))
(.f64 1/4 (pow.f64 (sqrt.f64 (.f64 4 (*.f64 y-scale b))) 2))
(.f64 1/4 (pow.f64 (.f64 (sqrt.f64 (*.f64 y-scale b)) 2) 2))
(.f64 (.f64 1/4 y-scale) (cbrt.f64 (pow.f64 (*.f64 b 4) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (sqrt.f64 8)))))
(.f64 1/4 (-.f64 (exp.f64 (log1p.f64 (.f64 4 (*.f64 y-scale b)))) 1))
(.f64 1/4 (-.f64 (fabs.f64 (fma.f64 y-scale (.f64 4 b) 1)) 1))
(.f64 1/4 (pow.f64 (.f64 (pow.f64 (*.f64 y-scale b) 3) 64) 1/3))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 b (.f64 (sqrt.f64 8) (sqrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 8) b) (sqrt.f64 2)))
(.f64 (.f64 1/4 y-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 b 4))) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale b) (sqrt.f64 8)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (sqrt.f64 (.f64 (*.f64 8 b) b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 b (*.f64 b 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (sqrt.f64 2) (/.f64 x-scale b)))
(.f64 1/4 (fabs.f64 (cbrt.f64 (pow.f64 (.f64 4 (*.f64 y-scale b)) 3))))
(.f64 1/4 (fabs.f64 (pow.f64 (cbrt.f64 (.f64 4 (*.f64 y-scale b))) 3)))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (.f64 (.f64 (sqrt.f64 8) y-scale) b))))
(.f64 (.f64 1/4 y-scale) (.f64 (fabs.f64 (.f64 b (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (.f64 b (pow.f64 (sqrt.f64 2) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 y-scale b) (pow.f64 (sqrt.f64 2) 3))))
(.f64 1/4 (.f64 (.f64 (pow.f64 (cbrt.f64 b) 2) (.f64 4 y-scale)) (cbrt.f64 b)))
(.f64 1/4 (-.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 3) 1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (*.f64 b (pow.f64 64 1/3)) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 1) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (sqrt.f64 (.f64 (.f64 b b) 16)) 3) 1/3))
(.f64 1/4 (.f64 (pow.f64 (cbrt.f64 (.f64 y-scale b)) 2) (.f64 4 (cbrt.f64 (*.f64 y-scale b)))))
(.f64 (.f64 1/4 y-scale) (.f64 (pow.f64 2 1/6) (.f64 (*.f64 b (sqrt.f64 8)) (cbrt.f64 2))))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (.f64 (.f64 b b) 16) 1/2) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (.f64 (cbrt.f64 (.f64 b 4)) (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (*.f64 b 4))))))
(.f64 (.f64 1/4 y-scale) (.f64 (sqrt.f64 (.f64 (.f64 b 4) (cbrt.f64 (.f64 (.f64 b b) 16)))) (pow.f64 (.f64 b 4) 1/6)))
(.f64 (/.f64 (.f64 -1/4 (.f64 (.f64 b (sqrt.f64 2)) (sqrt.f64 8))) (.f64 y-scale (.f64 x-scale x-scale))) (neg.f64 (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 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (.f64 4 (.f64 y-scale b)) (+.f64 2 (pow.f64 (+.f64 (.f64 4 (*.f64 y-scale b)) 1) 2)))) 1))
(.f64 1/4 (+.f64 (.f64 4 (.f64 y-scale b)) (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 b 2)) (.f64 72 (pow.f64 b 2)))) (.f64 4/3 (.f64 (+.f64 (.f64 8 b) (*.f64 4 b)) b))))))
(.f64 1/4 (+.f64 (.f64 (pow.f64 b 2) (-.f64 (.f64 1/3 (+.f64 (.f64 -24 (pow.f64 y-scale 2)) (.f64 72 (pow.f64 y-scale 2)))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 8 y-scale) (.f64 4 y-scale)))))) (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (.f64 (sqrt.f64 2) (exp.f64 (log.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (expm1.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (exp.f64 (log.f64 (.f64 b (sqrt.f64 8)))))))
(.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) (pow.f64 (pow.f64 (exp.f64 (log.f64 (*.f64 b 4))) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 b)) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (pow.f64 (.f64 (sqrt.f64 2) (cbrt.f64 (.f64 y-scale b))) 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 (pow.f64 (pow.f64 (cbrt.f64 (*.f64 b 4)) 3) 3) 1/3))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 b (sqrt.f64 8))))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (.f64 y-scale (pow.f64 (.f64 (sqrt.f64 512) (pow.f64 b 3)) 1/3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)))) 1)))
(.f64 1/4 (pow.f64 (pow.f64 (.f64 (sqrt.f64 2) (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (log.f64 (+.f64 1 (expm1.f64 (.f64 (sqrt.f64 8) (.f64 b (sqrt.f64 2)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (-.f64 (exp.f64 (log1p.f64 (.f64 (sqrt.f64 8) b))) 1) (sqrt.f64 2)))
(.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))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 3) 1/3) 3) 1/3))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 b 4) 6) 1/6) 3) 1/3))
(.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 2) (.f64 a (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))))
(.f64 -1/4 (.f64 y-scale (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.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 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 -1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 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 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 a (sqrt.f64 8)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) b) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))) (*.f64 (sqrt.f64 2) x-scale)))
(.f64 1/4 (.f64 (.f64 (.f64 y-scale (sqrt.f64 2)) (.f64 (sqrt.f64 8) a)) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 y-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (*.f64 (sqrt.f64 8) (sqrt.f64 2))) -1/4))
(.f64 (.f64 -1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 1/4 y-scale) (.f64 (.f64 (sqrt.f64 2) b) (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (.f64 1/4 (sqrt.f64 2)) (.f64 (.f64 y-scale a) (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (.f64 (.f64 y-scale -1/4) (.f64 (sqrt.f64 2) b)) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (sqrt.f64 8)))
(.f64 (.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a) (.f64 (sqrt.f64 8) (sqrt.f64 2))) (*.f64 1/4 y-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) a)))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (.f64 (sqrt.f64 2) (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) b)) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) b)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) a)))))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (/.f64 (neg.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (.f64 (sqrt.f64 2) a))) x-scale))
(.f64 (.f64 1/4 (.f64 (.f64 y-scale x-scale) (sqrt.f64 8))) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 a (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))) x-scale)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (+.f64 1 (.f64 (.f64 y-scale b) 8))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b)) 3)))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 8) (.f64 y-scale b))) 3))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (cbrt.f64 (.f64 (pow.f64 (.f64 y-scale b) 3) (*.f64 8 (sqrt.f64 8)))))))
(.f64 1/4 (.f64 (sqrt.f64 2) (fabs.f64 (/.f64 (neg.f64 (pow.f64 (.f64 y-scale (.f64 b (sqrt.f64 8))) 3)) (.f64 8 (pow.f64 (.f64 y-scale b) 2))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 1 (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 1 2)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 (sqrt.f64 2) x-scale) (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (.f64 (/.f64 (sqrt.f64 2) x-scale) (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) (/.f64 (*.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (neg.f64 (.f64 (/.f64 (.f64 (sqrt.f64 2) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) y-scale) (/.f64 (.f64 b (/.f64 (sqrt.f64 8) y-scale)) x-scale)))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (neg.f64 (/.f64 (sqrt.f64 2) (/.f64 x-scale (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b)))))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (/.f64 (neg.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 b (sqrt.f64 2)))) x-scale))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 -1 (/.f64 (.f64 (sqrt.f64 2) (.f64 b (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) x-scale)))) (neg.f64 (pow.f64 (.f64 x-scale y-scale) 2)))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 (.f64 (sqrt.f64 8) (pow.f64 b 3)) 1/3)) 3) 1/3))
(.f64 1/4 (fma.f64 (pow.f64 (cbrt.f64 (fma.f64 4 (.f64 y-scale b) 1)) 2) (cbrt.f64 (fma.f64 4 (*.f64 y-scale b) 1)) -1))
(.f64 (.f64 1/4 y-scale) (pow.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (.f64 b 4) 3/2) 1/3) (pow.f64 (pow.f64 (*.f64 b 4) 3/2) 1/3)) 3) 1/3))
(.f64 1/4 (/.f64 (-.f64 (.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b))))) 1) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 1)))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 (log1p.f64 (.f64 y-scale (*.f64 b 4))) 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 angle (.f64 1/180 (PI.f64)))) 2))) (/.f64 (pow.f64 1 2) (/.f64 (.f64 x-scale x-scale) (*.f64 b b)))))))
(.f64 1/4 (fma.f64 (-.f64 (+.f64 (.f64 (pow.f64 y-scale 3) 96) (.f64 (pow.f64 y-scale 3) -224/3)) (fma.f64 1/3 (.f64 y-scale (.f64 12 (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))))) (.f64 4/3 (.f64 y-scale (+.f64 (.f64 y-scale (.f64 y-scale 0)) (.f64 y-scale (.f64 y-scale 16))))))) (pow.f64 b 3) (fma.f64 (.f64 b b) (+.f64 (.f64 y-scale (.f64 y-scale 16)) (.f64 -4/3 (.f64 y-scale (.f64 y-scale 12)))) (.f64 4 (.f64 y-scale b)))))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (+.f64 (.f64 (pow.f64 b 3) -96) (-.f64 (.f64 (pow.f64 b 3) 352/3) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 (+.f64 (.f64 b (.f64 b 16)) (.f64 (.f64 b b) 0)) (.f64 b 4/3))))) (fma.f64 4 (.f64 y-scale b) (.f64 y-scale (.f64 y-scale (+.f64 (.f64 b (.f64 b 16)) (.f64 -4/3 (.f64 b (.f64 b 12)))))))))
(.f64 (.f64 1/4 y-scale) (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 b 4)))) (+.f64 (exp.f64 (log1p.f64 (.f64 b 4))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 b 4)))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 2) (log1p.f64 (.f64 4 (.f64 y-scale b))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (pow.f64 (pow.f64 (pow.f64 (+.f64 (.f64 y-scale (.f64 b 4)) 1) 3) 1/3) 2)))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 b))) (log.f64 (*.f64 -4 y-scale)))))))))
(.f64 1/4 (/.f64 (expm1.f64 (.f64 3 (log1p.f64 (.f64 4 (.f64 y-scale b))))) (+.f64 (exp.f64 (log1p.f64 (.f64 4 (.f64 y-scale b)))) (+.f64 1 (exp.f64 (.f64 2 (+.f64 (.f64 -1 (log.f64 (/.f64 1 y-scale))) (log.f64 (*.f64 4 b)))))))))
(fma.f64 1/4 (.f64 (sqrt.f64 2) (.f64 (.f64 (sqrt.f64 8) b) y-scale)) (.f64 (/.f64 1/8 b) (.f64 (/.f64 y-scale (sqrt.f64 2)) (.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 -1/16200 b) b) (.f64 (.f64 1/16200 a) a))) (.f64 (*.f64 angle angle) (sqrt.f64 8))))))
(.f64 (.f64 -1/4 (.f64 (/.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (.f64 (/.f64 1 x-scale) (fma.f64 1/2 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 (.f64 1/16200 a) a) (.f64 (.f64 -1/16200 b) b))) (/.f64 (sqrt.f64 2) (/.f64 (.f64 angle angle) b))) (.f64 b (sqrt.f64 2)))))) (neg.f64 (pow.f64 (*.f64 x-scale y-scale) 2)))
(.f64 1/4 (fma.f64 (pow.f64 y-scale 3) (-.f64 (.f64 1/3 (fma.f64 -288 (pow.f64 b 3) (.f64 (pow.f64 b 3) 352))) (fma.f64 1/3 (.f64 (.f64 b 12) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))) (.f64 4/3 (.f64 b (+.f64 (.f64 (.f64 b b) 16) (.f64 (.f64 b b) 0)))))) (fma.f64 4 (.f64 y-scale b) (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 1/3 (.f64 (.f64 b b) 48)) (.f64 -4/3 (.f64 b (.f64 b 12))))))))
(.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) (.f64 1/4 (.f64 y-scale (sqrt.f64 8))))

Outputs
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))

Calls

5 calls:

103.0ms	x-scale
77.0ms	y-scale
72.0ms	angle
71.0ms	b
66.0ms	a

Results

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

Compiler

Compiled 2766 to 2032 computations (26.5% saved)

regimes26.0ms (0%)

Accuracy

Total -9.5b remaining (-18.1%)

Threshold costs -9.5b (-18.1%)

Counts

4 → 1

Calls

Call 1

Inputs
(*.f64 1/4 (-.f64 1 1))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(.f64 1/4 (-.f64 (+.f64 1 (.f64 4 (*.f64 y-scale b))) 1))
(.f64 1/4 (/.f64 1 (/.f64 1 (.f64 4 (*.f64 y-scale b)))))

Outputs
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))

Calls

5 calls:

5.0ms	b
4.0ms	y-scale
4.0ms	a
4.0ms	angle
4.0ms	x-scale

Results

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

Compiler

Compiled 69 to 56 computations (18.8% saved)

simplify14.0ms (0%)

Algorithm

1×	egg-herbie

Rules

40×	`*-commutative`
6×	`fabs-mul`
2×	`1-exp`
2×	`+-commutative`
2×	`if-if-or-not`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	71	437
1	100	437
2	105	437

Stop Event

1×	fuel
1×	saturated

Calls

Call 1

Inputs
(if (<=.f64 y-scale -6199999999999999925068398107210681893580125830112250508700771548363460134456537567461376) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (if (<=.f64 y-scale -6032744662767799/172364133221937103085272756482216056112753534658909761028039668631756215232006744379020625060744018369805777923479247838020220755974022884986972234404720831691332769255536872593544438018353486799545737272878084128768) (.f64 1/4 (fabs.f64 (.f64 4 (.f64 y-scale b)))) (if (<=.f64 y-scale 3455165794209175/1799565517817278553124215403074392743547878847320766653240302229044735032268595148127616274441556342859968364253408358049283306422197719875603406072346065542053888) (.f64 1/4 (.f64 x-scale (.f64 (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 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b)))))))
(if (<=.f64 y-scale -520000000000000014233638012869875212041787981475565065177942222611865202366620327120732160) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b)))))
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(*.f64 1/4 (-.f64 1 1))

Outputs
(if (<=.f64 y-scale -6199999999999999925068398107210681893580125830112250508700771548363460134456537567461376) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (if (<=.f64 y-scale -6032744662767799/172364133221937103085272756482216056112753534658909761028039668631756215232006744379020625060744018369805777923479247838020220755974022884986972234404720831691332769255536872593544438018353486799545737272878084128768) (.f64 1/4 (fabs.f64 (.f64 4 (.f64 y-scale b)))) (if (<=.f64 y-scale 3455165794209175/1799565517817278553124215403074392743547878847320766653240302229044735032268595148127616274441556342859968364253408358049283306422197719875603406072346065542053888) (.f64 1/4 (.f64 x-scale (.f64 (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 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b)))))))
(if (<=.f64 y-scale -6199999999999999925068398107210681893580125830112250508700771548363460134456537567461376) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (if (or (<=.f64 y-scale -6032744662767799/172364133221937103085272756482216056112753534658909761028039668631756215232006744379020625060744018369805777923479247838020220755974022884986972234404720831691332769255536872593544438018353486799545737272878084128768) (not (<=.f64 y-scale 3455165794209175/1799565517817278553124215403074392743547878847320766653240302229044735032268595148127616274441556342859968364253408358049283306422197719875603406072346065542053888))) (.f64 1/4 (.f64 4 (fabs.f64 (.f64 y-scale b)))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (.f64 2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 b b))))))))))
(if (<=.f64 y-scale -520000000000000014233638012869875212041787981475565065177942222611865202366620327120732160) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b)))))
(if (<=.f64 y-scale -520000000000000014233638012869875212041787981475565065177942222611865202366620327120732160) (.f64 (.f64 y-scale (sqrt.f64 8)) (.f64 (sqrt.f64 (.f64 2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) b) 2) (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))) -1/4)) (.f64 1/4 (.f64 4 (fabs.f64 (*.f64 y-scale b)))))
(.f64 1/4 (fabs.f64 (.f64 4 (*.f64 y-scale b))))
(.f64 1/4 (.f64 4 (fabs.f64 (*.f64 y-scale b))))
(.f64 1/4 (.f64 4 (*.f64 y-scale b)))
(*.f64 1/4 (-.f64 1 1))
0

Compiler

Compiled 170 to 136 computations (20% saved)

soundness817.0ms (0.8%)

Algorithm

4×	egg-herbie

Rules

1834×	`associate-*r/`
1758×	`distribute-lft-neg-out`
1758×	`distribute-lft-neg-out`
1678×	`associate-r`
1484×	`*-commutative`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	60	583
1	162	557
2	675	557
3	5646	553
0	503	21719
1	1640	20395
0	12	55
1	238	55
2	2675	41
0	60	583
1	162	557
2	675	557
3	5646	553
0	1624	286378
1	6395	286378

Stop Event

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

Compiler

Compiled 891 to 640 computations (28.2% saved)

end79.0ms (0.1%)

Compiler: Compiled 150 to 110 computations (26.7% saved)