Details

analyze6.6s (4.6%)

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)

sample1.5min (62.7%)

Results

40.8s	3899×	body	4096	valid
33.3s	1567×	body	8192	valid
11.6s	1831×	body	2048	valid
2.2s	603×	body	1024	valid
620.0ms	49×	body	2048	infinite
534.0ms	222×	body	512	valid
182.0ms	134×	body	256	valid
110.0ms	29×	body	1024	infinite
70.0ms	16×	body	512	infinite
29.0ms	2×	body	4096	infinite
10.0ms	11×	body	256	infinite

Bogosity

preprocess124.0ms (0.1%)

Algorithm

2×	egg-herbie

Rules

1102×	`distribute-rgt-neg-out`
980×	`distribute-lft-neg-out`
942×	`associate-/r/`
828×	`associate-r`
766×	`associate-l`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	413	6413
1	1208	6055
2	5415	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)))
(neg.f64 (/.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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))) (.f64 x-scale y-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 (neg.f64 a) (.f64 a (.f64 b b))) (.f64 (/.f64 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (pow.f64 (.f64 x-scale y-scale) 2)) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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 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 (neg.f64 a) (.f64 a (*.f64 b 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 (/.f64 (+.f64 (pow.f64 (.f64 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 (+.f64 (pow.f64 (.f64 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)) (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 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 (neg.f64 a) (.f64 a (.f64 b b))) (.f64 (/.f64 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (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 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)) (.f64 x-scale x-scale)) (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 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 a a) (.f64 b b)))) x-scale) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (.f64 (neg.f64 a) (.f64 a (*.f64 b b))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (/.f64 (sqrt.f64 (.f64 (.f64 (neg.f64 a) (.f64 a (.f64 b b))) (.f64 (/.f64 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (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 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)) (.f64 x-scale x-scale)) (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 (/.f64 x-scale (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))))))))) (.f64 (neg.f64 a) (.f64 a (.f64 b 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 (/.f64 4 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 b (.f64 angle (.f64 b (neg.f64 angle)))))) (.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 (.f64 4 (.f64 b 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 2 (-.f64 (.f64 b b) (.f64 angle angle))) (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 a 180))) (cos.f64 (.f64 (PI.f64) (/.f64 a 180))))) (.f64 x-scale 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)))
(.f64 (/.f64 (neg.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 (.f64 4 (.f64 b x-scale)) (.f64 b (neg.f64 x-scale)))) (pow.f64 (.f64 a y-scale) 2))
(.f64 (pow.f64 (.f64 a y-scale) 2) (.f64 -1/4 (/.f64 (sqrt.f64 (.f64 (/.f64 (.f64 8 (neg.f64 (pow.f64 (.f64 b x-scale) 2))) (pow.f64 (.f64 a y-scale) 2)) (.f64 (neg.f64 (pow.f64 (.f64 b x-scale) 2)) (+.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)) (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 2 (.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (-.f64 (.f64 b b) (.f64 x-scale x-scale))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (.f64 a 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 (.f64 (/.f64 8 (pow.f64 (.f64 a y-scale) 2)) (neg.f64 (pow.f64 (.f64 b x-scale) 2))) (.f64 (neg.f64 (pow.f64 (.f64 b x-scale) 2)) (+.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)) (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 (-.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 a y-scale)) (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))))) (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 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 (.f64 b (.f64 y-scale (neg.f64 (.f64 b y-scale)))) (/.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 (/.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))) (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 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 (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 (pow.f64 (.f64 a x-scale) 2)) (neg.f64 (pow.f64 (.f64 b y-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)))
(.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 (.f64 4 (.f64 a angle)) (.f64 (neg.f64 a) angle)) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 angle (.f64 a (.f64 (neg.f64 a) angle))))) (+.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 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 8 (.f64 angle (.f64 (neg.f64 a) (.f64 a angle)))) (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a (neg.f64 angle)) (.f64 (.f64 a 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 (cos.f64 (.f64 (PI.f64) (/.f64 b 180))) (.f64 2 (-.f64 (.f64 angle angle) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (/.f64 b 180)))) (.f64 x-scale y-scale)))))))) (.f64 angle (.f64 (neg.f64 a) (.f64 a angle))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 -1/4 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 a (.f64 angle (.f64 a (neg.f64 angle))))) (.f64 (.f64 a (neg.f64 angle)) (.f64 (.f64 a angle) (-.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)) (-.f64 (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 (cos.f64 (.f64 (PI.f64) (/.f64 b 180))) (.f64 2 (-.f64 (.f64 angle angle) (.f64 a a)))) (sin.f64 (.f64 (PI.f64) (/.f64 b 180)))) (.f64 x-scale y-scale))) (/.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 a (.f64 angle (.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 (+.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))) (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 (/.f64 (.f64 8 (neg.f64 (pow.f64 (.f64 a x-scale) 2))) (pow.f64 (.f64 b y-scale) 2)) (.f64 (neg.f64 (pow.f64 (.f64 a x-scale) 2)) (-.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))) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 x-scale x-scale) (.f64 a a)))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (.f64 b y-scale))))))) (neg.f64 (pow.f64 (.f64 a x-scale) 2)))))
(.f64 (pow.f64 (.f64 b y-scale) 2) (.f64 -1/4 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (pow.f64 (.f64 b y-scale) 2)) (neg.f64 (pow.f64 (.f64 a x-scale) 2))) (.f64 (neg.f64 (pow.f64 (.f64 a x-scale) 2)) (-.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))) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 x-scale x-scale) (.f64 a a)))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (.f64 b y-scale))))))) (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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 2 (-.f64 (.f64 y-scale y-scale) (.f64 a a)))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (.f64 b 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)))
(.f64 (/.f64 (neg.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 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 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (pow.f64 (.f64 y-scale angle) 2)) (.f64 (.f64 b (neg.f64 a)) (.f64 (.f64 b a) (-.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))) (hypot.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))) (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (sin.f64 (/.f64 (.f64 x-scale (PI.f64)) 180)))) angle) (/.f64 (cos.f64 (/.f64 (.f64 x-scale (PI.f64)) 180)) y-scale)))))))) (.f64 (neg.f64 a) (.f64 a (*.f64 b b))))))
(.f64 (pow.f64 (.f64 y-scale angle) 2) (.f64 -1/4 (/.f64 (sqrt.f64 (.f64 (.f64 (/.f64 8 (pow.f64 (.f64 y-scale angle) 2)) (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (.f64 (.f64 b (neg.f64 a)) (.f64 (.f64 b a) (-.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)) (-.f64 (hypot.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))) (.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (.f64 2 (sin.f64 (/.f64 (.f64 x-scale (PI.f64)) 180)))) angle) (/.f64 (cos.f64 (/.f64 (.f64 x-scale (PI.f64)) 180)) y-scale))) (/.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 (neg.f64 a) (.f64 a (*.f64 b 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)))
(.f64 (/.f64 (neg.f64 (sqrt.f64 (.f64 (.f64 2 (.f64 (/.f64 (.f64 (.f64 4 (.f64 b a)) (.f64 b (neg.f64 a))) (pow.f64 (.f64 x-scale angle) 2)) (.f64 b (.f64 a (.f64 b (neg.f64 a)))))) (+.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)) (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 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 (neg.f64 a) (.f64 a (.f64 b b))) (.f64 (/.f64 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b 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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (PI.f64) (/.f64 y-scale 180))))) x-scale) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 y-scale 180))) angle)))))))) (.f64 (neg.f64 a) (.f64 a (*.f64 b 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)))
(neg.f64 (/.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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))) (.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 b a) (.f64 (.f64 b (neg.f64 a)) (/.f64 (.f64 8 (.f64 (neg.f64 a) (.f64 a (.f64 b b)))) (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 (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 (/.f64 (+.f64 (pow.f64 (.f64 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 (neg.f64 a) (.f64 a (*.f64 b b))))))

Compiler

Compiled 193 to 129 computations (33.2% saved)

simplify63.0ms (0%)

Algorithm

1×	egg-herbie

Rules

1612×	`distribute-lft-neg-out`
1560×	`distribute-rgt-neg-out`
1336×	`times-frac`
1150×	`associate-r`
1002×	`associate-l`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	60	583
1	157	557
2	639	557
3	5305	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 (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 2 (.f64 (-.f64 (.f64 b b) (.f64 a a)) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))))) (.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 (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 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))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle 180) (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))) x-scale) (/.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) y-scale)))))) (.f64 b (.f64 a (*.f64 b (neg.f64 a)))))))
(.f64 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 a (.f64 (neg.f64 a) (.f64 b b)))) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 (.f64 b a) (neg.f64 a)) (.f64 (.f64 (/.f64 8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 a (.f64 (neg.f64 a) (.f64 b 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 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (.f64 y-scale (/.f64 (/.f64 x-scale (.f64 2 (fma.f64 a (neg.f64 a) (.f64 b b)))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))))))))))) -4))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))

eval11.0ms (0%)

Compiler: Compiled 895 to 535 computations (40.2% saved)

prune3.0ms (0%)

Pruning

1 alts after pruning (1 fresh and 0 done)

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

Accurracy

1.2%

Counts

6 → 1

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	1.2%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))

Status

Accuracy

Program

▶

1.2%

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

Compiler

Compiled 179 to 118 computations (34.1% saved)

localize673.0ms (0.5%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	66.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))
✓	61.2%	(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (*.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
✓	59.3%	(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
✓	58.6%	(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))

Compiler

Compiled 1746 to 1012 computations (42% saved)

series344.0ms (0.2%)

Counts

4 → 144

Calls

36 calls:

Time	Variable		Point	Expression
56.0ms	b	@	0	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))
35.0ms	angle	@	-inf	(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (*.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale))))
28.0ms	x-scale	@	inf	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))
21.0ms	y-scale	@	inf	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))
17.0ms	x-scale	@	0	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))

rewrite139.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1522×	`add-sqr-sqrt`
1496×	`*-un-lft-identity`
1404×	`add-exp-log`
1402×	`add-cbrt-cube`
1402×	`add-cube-cbrt`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	64	928
1	1492	928

Stop Event

1×	node limit

Counts

4 → 36

Calls

Call 1

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

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

simplify1.5s (1.1%)

Algorithm

1×	egg-herbie

Rules

1282×	`+-commutative`
1162×	`associate-*r/`
1108×	`*-commutative`
976×	`associate-*l/`
704×	`associate-+l+`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1366	284496
1	5051	284488

Stop Event

1×	node limit

Counts

180 → 324

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

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)))
(+.f64 1 (.f64 -1/64800 (.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 (.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 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 (.f64 -1/64800 (*.f64 angle angle)) (pow.f64 (PI.f64) 2)))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (.f64 1/180 angle) (PI.f64))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (*.f64 1/180 angle) (PI.f64)))
(fma.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)))))
(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 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))))))
(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 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))
(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (pow.f64 a 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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (fma.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))
(-.f64 (fma.f64 (.f64 a a) (+.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 -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 (pow.f64 a 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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (fma.f64 -1/2 (.f64 (pow.f64 a 4) (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2)))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a 4) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))) 2)))) (fma.f64 (.f64 a a) (+.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 -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 (pow.f64 a 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 (.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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (fma.f64 -1/2 (.f64 (pow.f64 a 4) (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2)))) (fma.f64 (.f64 a a) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (/.f64 (.f64 (.f64 (pow.f64 a 6) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))
(-.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (.f64 (pow.f64 a 4) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))) 2)))) (fma.f64 (.f64 a a) (+.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (/.f64 (pow.f64 a 6) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) 2)))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))
(.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -8)))))
(-.f64 (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 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 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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))) (.f64 a a)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))))))
(-.f64 (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 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 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 (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 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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))) (.f64 a a)) (.f64 (.f64 1/4 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2)) (pow.f64 a 4)) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))) (.f64 (/.f64 (.f64 1/4 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -8))))))
(.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))
(.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))
(.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -8)))))
(-.f64 (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 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 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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))) (.f64 a a)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))))))
(-.f64 (+.f64 (.f64 (pow.f64 a 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 -1/2 (.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 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 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 (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 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 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 -1/2 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))) (.f64 a a)) (.f64 (.f64 1/4 (.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2)) (pow.f64 a 4)) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))) -8)))))
(+.f64 (fma.f64 (.f64 a a) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (fma.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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))) (.f64 (/.f64 (.f64 1/4 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2))) (/.f64 (.f64 (pow.f64 a 4) (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8)))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale))) -8))))))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (.f64 1/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)))))) (pow.f64 angle 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(fma.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
(+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (.f64 1/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)))))) (pow.f64 angle 2)) (+.f64 (.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))) (.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 (pow.f64 a 2) (pow.f64 y-scale 2))))
(fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (fma.f64 (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)))) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
(fma.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (fma.f64 (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)))) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 (-.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 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 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3)))) (PI.f64)) (.f64 x-scale 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 (-.f64 (.f64 b b) (.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)))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
(+.f64 (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2)))) (.f64 1/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)))))) (pow.f64 angle 2)) (+.f64 (.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))) (.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 (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 (+.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 (pow.f64 a 2) (pow.f64 y-scale 2)))))
(fma.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (fma.f64 (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)))) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 (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 (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 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (+.f64 (/.f64 (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (/.f64 (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 x-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.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 (-.f64 (.f64 b b) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))))
(fma.f64 (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 angle angle) (fma.f64 (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)))) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 (-.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 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 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3)))) (PI.f64)) (.f64 x-scale 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 (-.f64 (.f64 b b) (.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 (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 (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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.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 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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 4 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.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 b b) (.f64 a a)) 1/1511654400000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 5))))) 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 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 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 (-.f64 (.f64 b b) (.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)))))) (/.f64 (.f64 a a) (.f64 y-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-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)))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale))))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-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)))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale))))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-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)))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale))))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-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)))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale))))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))
(-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (pow.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 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))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))
(-.f64 (+.f64 (.f64 (-.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 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)))))))) (pow.f64 b 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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))
(-.f64 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale)))))))
(-.f64 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)))))))
(-.f64 (+.f64 (.f64 (-.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 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)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 b 4)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))
(+.f64 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-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 (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 (.f64 (-.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 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)))))))) (pow.f64 b 2)) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))) (.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 b 6))))) (+.f64 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 b 4))))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))
(-.f64 (fma.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (/.f64 (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))) (.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 b 6))))) (+.f64 (fma.f64 (+.f64 (/.f64 (pow.f64 (cos.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (.f64 b b) (/.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 (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (.f64 (pow.f64 b 4) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))))))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))
(.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))
(.f64 (.f64 b b) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (.f64 b b)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (.f64 b b)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (.f64 b b)))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 b 4)))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (.f64 b b))))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (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) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))
(.f64 (.f64 b b) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (.f64 b b)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (.f64 b b)))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))
(-.f64 (+.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))
(+.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (.f64 -1/2 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (.f64 b b)))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))
(+.f64 (fma.f64 (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b) (fma.f64 1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 b 4)))) (+.f64 (/.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (.f64 b b))))))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (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)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (pow.f64 x-scale 2))
(/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (*.f64 x-scale x-scale))
(/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 x-scale x-scale))
(-.f64 (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (/.f64 (.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 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (*.f64 x-scale x-scale)))
(+.f64 (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 x-scale x-scale)))
(-.f64 (+.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 -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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))
(-.f64 (fma.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))
(+.f64 (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))
(-.f64 (+.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 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))))) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))
(-.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 4) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))) (fma.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))
(+.f64 (+.f64 (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 4) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))
(.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))
(neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (pow.f64 x-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (+.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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))
(neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 (pow.f64 x-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (+.f64 (.f64 -1 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 x-scale 4))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))
(+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 4))) (+.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 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (pow.f64 x-scale 6)) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3))))))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(.f64 -1 (/.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))) (pow.f64 y-scale 2)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 y-scale y-scale)))
(neg.f64 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 y-scale 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 -1 (/.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))) (pow.f64 y-scale 2))) (/.f64 (.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 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))
(+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(-.f64 (+.f64 (.f64 -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 (cos.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 -1 (/.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))) (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 (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))
(+.f64 (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(-.f64 (+.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 -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 (cos.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 -1 (/.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))) (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 (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2))))) (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -1 (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(.f64 -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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.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 -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 -1/2 (+.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(.f64 -1/2 (+.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)))))
(+.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 -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))))))))
(fma.f64 1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (.f64 -1/2 (+.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 -1/2 (+.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4))))))
(+.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 -1/4 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (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))))) 2)) (.f64 (pow.f64 y-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))
(fma.f64 1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 8))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 8))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))
(.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 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.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 -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 -1/2 (+.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))))))
(.f64 -1/2 (+.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4)))))
(+.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 -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))))))))
(fma.f64 1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (.f64 -1/2 (+.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 -1/2 (+.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4))))))
(+.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 -1/4 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 b 2) (pow.f64 (sin.f64 (.f64 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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (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))))) 2)) (.f64 (pow.f64 y-scale 8) (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))
(fma.f64 1/4 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (pow.f64 y-scale 8))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (fma.f64 -1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 4))) (fma.f64 1/2 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 8))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.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 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))))
(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(+.f64 (.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.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 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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))))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (.f64 (pow.f64 x-scale 3) y-scale) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))))
(+.f64 (.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.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 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -1/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 5) (.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)))))) (pow.f64 (.f64 -1/4 (.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 (.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8)))) (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 (.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))))))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (.f64 (pow.f64 x-scale 3) y-scale) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (.f64 (.f64 -1/8 (.f64 (.f64 y-scale (pow.f64 x-scale 5)) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 y-scale (.f64 (pow.f64 x-scale 5) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2)))))))))
(+.f64 (.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 7) (.f64 (+.f64 (.f64 -1/2 (/.f64 (+.f64 (pow.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))))) 2) (.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 (-.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 (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (+.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)))) (pow.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 (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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.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 (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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -1/8 (.f64 (.f64 y-scale (.f64 (pow.f64 x-scale 5) (.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)))))) (pow.f64 (.f64 -1/4 (.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 (.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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8)))) (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 (.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)))))))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (.f64 (pow.f64 x-scale 3) y-scale) (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 (pow.f64 x-scale 7) (.f64 (sqrt.f64 8) (fma.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 1/4 (.f64 (/.f64 (fma.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) 2)) (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (.f64 (.f64 -1/8 (.f64 (.f64 y-scale (pow.f64 x-scale 5)) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) 2))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 (pow.f64 x-scale 7) (.f64 (sqrt.f64 8) (fma.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 (fma.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) 2)) 1/4) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (+.f64 (/.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))) (fma.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (.f64 y-scale (.f64 (pow.f64 x-scale 5) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 2))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -1/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 y-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))) (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))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 4)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 x-scale 4)))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2)))) (pow.f64 x-scale 4))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 y-scale (.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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)))))) 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))))) (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 (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 (pow.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))))) 2) (.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 (-.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))) 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)))))) (sqrt.f64 8))) (pow.f64 x-scale 6)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 y-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))) (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))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 4)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (+.f64 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (/.f64 (.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 x-scale 4))))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/8 (+.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2)))) (pow.f64 x-scale 4))) (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))))) (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2) (/.f64 (.f64 -1/4 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 4) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))))
(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/4 (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -1/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 y-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))) (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))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 4)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 x-scale 4)))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2)))) (pow.f64 x-scale 4))))))
(+.f64 (.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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/16 (.f64 (/.f64 (.f64 y-scale (.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)) (sqrt.f64 8))) (.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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 y-scale (.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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)))))) 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))))) (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 (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.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 (pow.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))))) 2) (.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 (-.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))) 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)))))) (sqrt.f64 8))) (pow.f64 x-scale 6)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 y-scale (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (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))) (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))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (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)))))) 2)) (sqrt.f64 8))) (pow.f64 x-scale 4)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/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/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 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/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (/.f64 y-scale (/.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (+.f64 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))))))) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 4)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (/.f64 (.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)))) (pow.f64 (.f64 (.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 x-scale 4))))))
(fma.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 y-scale (.f64 x-scale x-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.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 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/8 (+.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (/.f64 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)))) (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2)))) (pow.f64 x-scale 4))) (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 y-scale (/.f64 (pow.f64 x-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (/.f64 (.f64 -1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 3) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))))))) (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2) (/.f64 (.f64 -1/4 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (/.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 4) (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))))))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 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 -1/16 (.f64 (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))) (.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 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 -1/16 (.f64 (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -1/8 (.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 5) (.f64 (sqrt.f64 8) (+.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)))) (pow.f64 (.f64 -1/4 (.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 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)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (fma.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (.f64 -1/8 (.f64 x-scale (.f64 (.f64 (.f64 (pow.f64 y-scale 5) (sqrt.f64 8)) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))) (pow.f64 (.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))) (fma.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))) (.f64 -1/8 (.f64 x-scale (.f64 (.f64 (pow.f64 y-scale 5) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))) (pow.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))))))
(+.f64 (.f64 -1/8 (.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 7) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/2 (/.f64 (+.f64 (pow.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))))) 2) (.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 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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))))) (.f64 1/4 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))) 2) (.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 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.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))) (.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))))))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 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 -1/16 (.f64 (/.f64 (.f64 (pow.f64 y-scale 3) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)) (sqrt.f64 8)))) (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 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 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 -1/8 (.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 5) (.f64 (sqrt.f64 8) (+.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)))) (pow.f64 (.f64 -1/4 (.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 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)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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/8 (.f64 x-scale (.f64 (.f64 (.f64 (pow.f64 y-scale 7) (sqrt.f64 8)) (fma.f64 -1/2 (/.f64 (+.f64 (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (.f64 1/4 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))))) (fma.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) (fma.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))))) (.f64 -1/8 (.f64 x-scale (.f64 (.f64 (.f64 (pow.f64 y-scale 5) (sqrt.f64 8)) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2))) (pow.f64 (.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a))))))))))))))
(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 x-scale (.f64 (pow.f64 y-scale 7) (.f64 (sqrt.f64 8) (fma.f64 -1/2 (/.f64 (+.f64 (pow.f64 (/.f64 (.f64 1/2 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 1/4 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2)) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (/.f64 (.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2))))))))) (fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))))) (fma.f64 -1/16 (.f64 (/.f64 (pow.f64 y-scale 3) (/.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 x-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))) (.f64 -1/8 (.f64 x-scale (.f64 (.f64 (pow.f64 y-scale 5) (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2))) (pow.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) 2)) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (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 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))) 2)))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) 1/2) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))))))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (-.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 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 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (.f64 (.f64 -1/16 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 (/.f64 (.f64 -1/16 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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 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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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)))))) 2) (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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))))) (sqrt.f64 8))) (pow.f64 y-scale 4)) (sqrt.f64 (/.f64 1 (-.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 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))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 y-scale 4)))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2))))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/4 (/.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)))))) (pow.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))) (sqrt.f64 (/.f64 1 (-.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 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (pow.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))))) 2) (.f64 -1/4 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 6)) (sqrt.f64 (/.f64 1 (-.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 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)))))))))) (+.f64 (.f64 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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 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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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)))))) 2) (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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))))) (sqrt.f64 8))) (pow.f64 y-scale 4)) (sqrt.f64 (/.f64 1 (-.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 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)))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 8)) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 y-scale 6))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 y-scale 4))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) 2)) (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))))))))))
(.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (.f64 (.f64 -1/16 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 (/.f64 (.f64 -1/16 x-scale) (/.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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 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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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)))))) 2) (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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))))) (sqrt.f64 8))) (pow.f64 y-scale 4)) (sqrt.f64 (/.f64 1 (-.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 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))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 y-scale 4)))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2))))))))))))
(+.f64 (.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/4 (/.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)))))) (pow.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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))) (sqrt.f64 (/.f64 1 (-.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 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 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.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 (pow.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))))) 2) (.f64 -1/4 (/.f64 (.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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) (pow.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 y-scale 6)) (sqrt.f64 (/.f64 1 (-.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 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)))))))))) (+.f64 (.f64 -1/16 (.f64 (/.f64 (.f64 x-scale (.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)) (sqrt.f64 8))) (.f64 (pow.f64 y-scale 2) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 b 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/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)))))))))) (.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.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 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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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)))))) 2) (.f64 -1/4 (/.f64 (.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 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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))))) (sqrt.f64 8))) (pow.f64 y-scale 4)) (sqrt.f64 (/.f64 1 (-.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 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)))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (.f64 (.f64 x-scale (sqrt.f64 8)) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (pow.f64 (.f64 (.f64 -1/4 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) 2)) (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2) (.f64 -1/4 (/.f64 (.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2))) (.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) (pow.f64 y-scale 6))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) 2)) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))) (sqrt.f64 8)) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (/.f64 (.f64 1/2 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))) (/.f64 (.f64 4 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (pow.f64 y-scale 4))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 6) (.f64 (sqrt.f64 8) (fma.f64 1/4 (.f64 (/.f64 (fma.f64 -1/4 (.f64 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (pow.f64 (.f64 -1/4 (.f64 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) 2)) (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2) (.f64 -1/4 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (/.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))) (fma.f64 -1/16 (.f64 (.f64 (/.f64 x-scale (.f64 y-scale y-scale)) (/.f64 (.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (sqrt.f64 8)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))) (.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale)))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (/.f64 (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) 2)) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) 2) (/.f64 (.f64 -1/4 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 x-scale x-scale))))) (/.f64 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (-.f64 (pow.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) 2) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))) 2)))))))))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-scale 2))))))))))
(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale)))))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-scale 2)))))))))) (.f64 1/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) (.f64 1/8 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))) (.f64 1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-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 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 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-scale 2))))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (.f64 (.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))))))) (.f64 1/8 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))) (pow.f64 (.f64 1/2 (.f64 (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))))) (.f64 1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))))))))
(+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-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 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 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-scale 2))))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 1/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (.f64 (pow.f64 a 2) (pow.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/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 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 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 (-.f64 (+.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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))))))))))) 2))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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 x-scale 2) (pow.f64 y-scale 2)))))))))) (.f64 (pow.f64 b 6) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (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))))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (.f64 (.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))))))) (fma.f64 1/8 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) (.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (/.f64 (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))))) (.f64 -1/2 (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (/.f64 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 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 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))) 2))) (pow.f64 (.f64 (.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (.f64 (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))))))))) 2)))))) (.f64 (pow.f64 b 6) (sqrt.f64 8)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 y-scale y-scale)))))))))))))))
(fma.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))) (pow.f64 (.f64 1/2 (.f64 (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) 2)) (.f64 (pow.f64 b 4) (sqrt.f64 8)))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))))) (fma.f64 1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))))) (.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (fma.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (/.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)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (.f64 -1/2 (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) (/.f64 (+.f64 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) 2))) (pow.f64 (.f64 1/2 (.f64 (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))))))))) (+.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (.f64 -8 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) 2)))))) (.f64 (pow.f64 b 6) (sqrt.f64 8)))) (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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))))))))))))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(.f64 (.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 (.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 3) (.f64 (.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)))))) (.f64 (.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 -1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 3) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)))))) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/8 (.f64 (/.f64 (.f64 y-scale (.f64 (+.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (.f64 -1/2 (/.f64 (.f64 (+.f64 (pow.f64 (.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 (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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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))))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))))))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 3) (.f64 (.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)))))) (fma.f64 1/4 (.f64 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))))))))) (.f64 x-scale (sqrt.f64 8))) (pow.f64 b 5))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) (fma.f64 -1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 3) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)))))) (fma.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 x-scale (sqrt.f64 8)) (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))))))))))))
(.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))))
(fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))))))))
(fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 3) (.f64 (.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 3) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (+.f64 (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (/.f64 (.f64 (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))) 2)) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))) (.f64 -1/2 (/.f64 (.f64 (+.f64 (pow.f64 (.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 (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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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))))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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)))))))))) (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (sqrt.f64 8)))) (pow.f64 b 5)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))))))) (+.f64 (.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 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 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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))))) (pow.f64 b 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 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 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2)))) (+.f64 (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 2 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 -4 (/.f64 (.f64 (pow.f64 a 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 (.f64 (.f64 y-scale (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))))))))) (.f64 x-scale (sqrt.f64 8))) (pow.f64 b 5))) (fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 b 3) (.f64 (.f64 y-scale (sqrt.f64 8)) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (-.f64 (.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))))) b)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))))
(fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 x-scale (sqrt.f64 8)) (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2))) (/.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))) (.f64 -1/2 (/.f64 (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)) (/.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))))))))) (fma.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (/.f64 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) x-scale) (/.f64 (pow.f64 b 3) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) 2)))) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))) 2)))))) (.f64 (.f64 -1/8 (/.f64 (.f64 x-scale (.f64 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))) (-.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 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 -4 (.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (/.f64 (.f64 -4 (.f64 a a)) (/.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))))))) b)) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (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 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.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 (pow.f64 a 2) (sqrt.f64 8))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))) (.f64 (.f64 1/8 (.f64 (.f64 x-scale y-scale) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (.f64 (.f64 a a) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (.f64 1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 a a) (sqrt.f64 8)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (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 -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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) 2)) (sqrt.f64 8))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.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 (pow.f64 a 2) (sqrt.f64 8))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 (.f64 x-scale (pow.f64 a 4)) (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (pow.f64 (.f64 (.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))))) 2)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) (.f64 (.f64 1/8 (.f64 (.f64 x-scale y-scale) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (.f64 (.f64 a a) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (pow.f64 a 4) (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) 2))) (pow.f64 (.f64 1/2 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))) 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 a a) (sqrt.f64 8)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (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 -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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (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 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))) 2)) (sqrt.f64 8))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (pow.f64 a 6) (.f64 (sqrt.f64 8) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (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 (pow.f64 (.f64 1/2 (.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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.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 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))))))))))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 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/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))))))))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/8 (.f64 (.f64 y-scale (.f64 x-scale (.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (pow.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 (pow.f64 a 2) (sqrt.f64 8))))) (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 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 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/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 (.f64 x-scale (pow.f64 a 4)) (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) 2))) (pow.f64 (.f64 (.f64 1/2 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))))) 2)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))) (.f64 (.f64 x-scale y-scale) (.f64 (.f64 (pow.f64 a 6) (sqrt.f64 8)) (fma.f64 -1/2 (/.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)))))))) (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)))))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2))))))) (.f64 (.f64 -1/4 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))))) (.f64 (.f64 1/8 (.f64 (.f64 x-scale y-scale) (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (.f64 (.f64 1/2 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))) (.f64 (.f64 a a) (sqrt.f64 8))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2))))))))))
(fma.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))) (fma.f64 -1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (pow.f64 a 4) (.f64 (sqrt.f64 8) (fma.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))) 2))) (pow.f64 (.f64 1/2 (.f64 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (sqrt.f64 (/.f64 1 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))) 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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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/8 (.f64 (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 y-scale (.f64 x-scale (.f64 (pow.f64 a 6) (.f64 (sqrt.f64 8) (fma.f64 -1/2 (/.f64 (.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))) (.f64 -1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (+.f64 (pow.f64 (.f64 1/2 (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))))))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))) (-.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))) 2)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))))))) (.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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)))))) 2)) (/.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (fma.f64 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))))))) (.f64 1/8 (.f64 y-scale (.f64 (.f64 x-scale (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (.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 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 -4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))) (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 a a) (sqrt.f64 8)))) (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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 1/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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))))))) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))
(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))))) (pow.f64 a 3))) (fma.f64 1/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))
(fma.f64 -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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2)))))))))) (fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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))))))) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (.f64 -1/4 (.f64 (/.f64 (.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))))) (-.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))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -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) (.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))))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))
(fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))))) (pow.f64 a 3))) (fma.f64 -1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 5) (.f64 (.f64 y-scale (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))))))) (sqrt.f64 8))))) (fma.f64 1/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))))))
(fma.f64 -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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2)))))))))) (fma.f64 -1/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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 5) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8)) (/.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))))))))) (fma.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))))))
(.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))
(fma.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (.f64 (.f64 -1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))))
(fma.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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))))))) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))
(fma.f64 -1/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))))) (pow.f64 a 3))) (.f64 (.f64 -1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))
(fma.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.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 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 -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))))))) (sqrt.f64 8)))) a) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 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))))))) (sqrt.f64 8)))) (pow.f64 a 3)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))) (.f64 1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (+.f64 (.f64 -1/4 (.f64 (/.f64 (.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))))) (-.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))) (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 -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) (.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))))) (-.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.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 2 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 x-scale 2)) (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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)))) (pow.f64 a 5)) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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/8 (/.f64 (.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8))))))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) a) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 (.f64 (.f64 x-scale y-scale) (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2)) (pow.f64 (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))))) (pow.f64 a 3))) (fma.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 5) (.f64 (.f64 y-scale (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)) (/.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))) (.f64 -1/2 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 1/2 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))) 2) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))) 2))))) (/.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (.f64 1/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale))) -8)))))))))) (sqrt.f64 8)))))))))
(fma.f64 -1/8 (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))))) a) (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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) (fma.f64 1/8 (.f64 (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 3) (.f64 y-scale (.f64 (sqrt.f64 8) (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 2)))))))))) (fma.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (/.f64 x-scale (/.f64 (pow.f64 a 5) (.f64 y-scale (.f64 (sqrt.f64 8) (fma.f64 -1/4 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8)) (/.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (/.f64 (+.f64 (pow.f64 (.f64 1/2 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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/2 (.f64 (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))))) (pow.f64 (.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale x-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 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) -8))) (sqrt.f64 (/.f64 1 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))))
(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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) a))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))))) a)) (.f64 (.f64 1/4 x-scale) (.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (.f64 angle angle) (.f64 (sqrt.f64 8) (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))))))) a)) (.f64 1/4 (.f64 x-scale (.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2)))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-scale (.f64 (pow.f64 angle 4) (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 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/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))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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 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 (sqrt.f64 2) a))) 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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) a))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.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))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))) a))) 2)))) (sqrt.f64 8))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))))) a)) (.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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/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/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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 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 (-.f64 (.f64 b b) (.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)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 a (sqrt.f64 2)))) 2)))))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (.f64 angle angle) (.f64 (sqrt.f64 8) (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))))))) a)) (.f64 1/4 (.f64 x-scale (.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-scale (.f64 (pow.f64 angle 4) (.f64 (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4)) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (/.f64 (.f64 (+.f64 (.f64 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/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))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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 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 (sqrt.f64 2) a))) 2))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-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 (.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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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 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 (.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))))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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) a))) 2) (.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 (pow.f64 (sqrt.f64 2) 2) (pow.f64 a 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))))))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 1/8 (/.f64 (.f64 (pow.f64 y-scale 2) (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 (-.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 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) a))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8))))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (.f64 (pow.f64 angle 4) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) y-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) x-scale)) (fma.f64 (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.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))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))) a))) 2)))) (sqrt.f64 8))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale (pow.f64 angle 6)) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sqrt.f64 2) 2)) (/.f64 (.f64 (-.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))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (+.f64 (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (/.f64 (-.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))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))) a))) 2)))) (.f64 a a))) (/.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 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)))) (+.f64 (/.f64 (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 4 (pow.f64 (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000) 2) (.f64 2/45 (/.f64 (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 x-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 -1/2 (/.f64 (-.f64 (fma.f64 (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (-.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b)))) (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)) (.f64 2/45 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 x-scale y-scale) (.f64 (PI.f64) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (pow.f64 (PI.f64) 3) y-scale)) -1/8748000))))))) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 (-.f64 (.f64 b b) (.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)))))))))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 (.f64 x-scale (.f64 angle angle)) (.f64 (sqrt.f64 8) (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))))) (/.f64 (.f64 1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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))))))) a)) (.f64 (.f64 1/4 x-scale) (.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))))))
(fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.f64 (+.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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/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/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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 2/45 (.f64 (/.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) 2)))) (pow.f64 (.f64 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 (-.f64 (.f64 b b) (.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)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 a (sqrt.f64 2)))) 2)))))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 6) (.f64 (sqrt.f64 8) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))))) (.f64 1/2 (+.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 a a) (pow.f64 (sqrt.f64 2) 2)) (.f64 (+.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))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 (+.f64 (fma.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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/3149280000 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 4))) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))))) (+.f64 (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 (-.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 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 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3)))) (PI.f64)) (.f64 x-scale 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 (-.f64 (.f64 b b) (.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))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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 a (sqrt.f64 2)))) 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 a a) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000))) (-.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 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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 4 (pow.f64 (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3))) 2) (.f64 2/45 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) x-scale) (/.f64 (.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 b b) (.f64 a a)) 1/1511654400000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 5))))) y-scale)))))) (.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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 (-.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 (pow.f64 (PI.f64) 4) (.f64 b b)) (.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))) (+.f64 (pow.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 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 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (-.f64 (.f64 b b) (.f64 a a)) -1/8748000) (/.f64 (.f64 x-scale y-scale) (pow.f64 (PI.f64) 3)))) (PI.f64)) (.f64 x-scale 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 (-.f64 (.f64 b b) (.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 (-.f64 (.f64 b b) (.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))))))))))) a)) (fma.f64 1/8 (.f64 (/.f64 (.f64 y-scale y-scale) (sqrt.f64 2)) (/.f64 (.f64 x-scale (.f64 (.f64 angle angle) (.f64 (sqrt.f64 8) (+.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.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 (.f64 -1/2 (fma.f64 2 (.f64 (-.f64 (fma.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2))))) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.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)))))))) a)) (.f64 1/4 (.f64 x-scale (.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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)))) (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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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)))) (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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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)))) (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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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)))) (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 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 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 x-scale (.f64 y-scale (sqrt.f64 8))) (sqrt.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 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 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 (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 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))) 2)))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.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 (fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 x-scale x-scale) (.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 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))) 2))))))))
(.f64 1 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(.f64 (sqrt.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (sqrt.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(.f64 (.f64 (cbrt.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cbrt.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (cbrt.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(pow.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) 1)
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(log.f64 (exp.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(cbrt.f64 (.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) (cos.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cbrt.f64 (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(expm1.f64 (log1p.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(exp.f64 (log.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(log1p.f64 (expm1.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(.f64 1 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(.f64 (sqrt.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (sqrt.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (cbrt.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (cbrt.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(pow.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64))) 1)
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(log.f64 (exp.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(cbrt.f64 (.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64)))) (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(cbrt.f64 (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) (sin.f64 (*.f64 (PI.f64) (/.f64 angle 180))))))
(expm1.f64 (log1p.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(exp.f64 (log.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(log1p.f64 (expm1.f64 (sin.f64 (*.f64 (/.f64 angle 180) (PI.f64)))))
(sin.f64 (*.f64 (PI.f64) (/.f64 angle 180)))
(+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (neg.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(.f64 1 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (sqrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(.f64 (.f64 (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))) (cbrt.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale))) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))
(/.f64 (-.f64 (/.f64 (/.f64 (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2))) (.f64 x-scale x-scale)) (.f64 x-scale x-scale)) (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) 2)))))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))) 3)) (+.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (+.f64 (+.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))) 3)) (fma.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (+.f64 (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) 3) (pow.f64 (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))) 3)) (fma.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (+.f64 (fma.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (.f64 (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))) (/.f64 x-scale (.f64 (sin.f64 (.f64 (PI.f64) (/.f64 angle 180))) 2))))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))))
(pow.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))) 1)
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(log.f64 (exp.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(cbrt.f64 (.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(cbrt.f64 (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))) (.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(exp.f64 (log.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale))))))
(-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))
(pow.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a)))) 1)
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))
(log.f64 (exp.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))
(cbrt.f64 (.f64 (.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (.f64 b (neg.f64 a)))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (.f64 b (neg.f64 a))))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a))))))
(cbrt.f64 (.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a)))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))))))
(cbrt.f64 (.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))))))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))) (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))))))
(expm1.f64 (log1p.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))
(exp.f64 (log.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))
(log1p.f64 (expm1.f64 (.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (.f64 (/.f64 -1/4 (.f64 a b)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 -8 (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a b) (.f64 a b)))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) a) 2) (pow.f64 (.f64 (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))) b) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 (/.f64 x-scale 2) (sin.f64 (.f64 (/.f64 angle 180) (PI.f64))))) (/.f64 (cos.f64 (.f64 (/.f64 angle 180) (PI.f64))) y-scale)))))))) (*.f64 b (neg.f64 a))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 (/.f64 -1/4 (.f64 b a)) b) (/.f64 (sqrt.f64 (.f64 (.f64 b (.f64 (.f64 a a) (.f64 (.f64 (/.f64 -8 (pow.f64 (.f64 x-scale y-scale) 2)) (.f64 (.f64 a a) (.f64 b b))) (neg.f64 b)))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (.f64 (PI.f64) (/.f64 angle 180))) y-scale)))))) (neg.f64 a))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (/.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (.f64 b (neg.f64 a)) (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 (/.f64 (.f64 a -8) (/.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (.f64 a a) (.f64 b b)))) (neg.f64 b))) (-.f64 (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2) (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) 2)) (.f64 y-scale y-scale))) (.f64 (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale 2)) (sin.f64 (.f64 (PI.f64) (/.f64 angle 180)))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle 180))) y-scale))))))))))

eval5.0s (3.5%)

Compiler: Compiled 258477 to 155993 computations (39.6% saved)

prune480.0ms (0.3%)

Pruning

21 alts after pruning (21 fresh and 0 done)

	Pruned	Kept	Total
New	491	21	512
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	492	21	513

Accurracy

37.0%

Counts

513 → 21

Alt Table

Click to see full alt table

Status	Accuracy	Program
	0.6%	(fma.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))))
	1.8%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 x-scale x-scale)))))) (*.f64 b (neg.f64 a)))))
▶	4.3%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 b (neg.f64 a)))))
	3.9%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 b (neg.f64 a)))))
	2.2%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
	6.7%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
	6.2%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))))))))))
	1.5%	(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
▶	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
	4.2%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
	2.3%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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.5%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))
	2.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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)))))))))
▶	3.6%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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.3%	(.f64 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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)))))))))
▶	4.6%	(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
	1.8%	(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
	2.7%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
	5.5%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
	1.9%	(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
	3.9%	(.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))

Compiler

Compiled 5894 to 3684 computations (37.5% saved)

localize19.0ms (0%)

Local Accuracy

Found 2 expressions with local accuracy:

New	Accuracy	Program
✓	99.4%	(.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2))
✓	99.3%	(*.f64 a (sqrt.f64 8))

Compiler

Compiled 39 to 32 computations (17.9% saved)

series3.0ms (0%)

Counts

2 → 12

Calls

6 calls:

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

rewrite65.0ms (0%)

Algorithm

1×	batch-egg-rewrite

Rules

1650×	`add-sqr-sqrt`
1632×	`*-un-lft-identity`
1516×	`add-cube-cbrt`
1494×	`add-cbrt-cube`
178×	`pow1`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	10	32
1	197	18
2	2139	18

Stop Event

1×	node limit

Counts

2 → 26

Calls

Call 1

Inputs
(*.f64 a (sqrt.f64 8))
(.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2))

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

Outputs

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

(((-.f64 (exp.f64 (log1p.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((pow.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((pow.f64 (*.f64 (sqrt.f64 a) 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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((pow.f64 (cbrt.f64 (*.f64 a 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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((pow.f64 (pow.f64 (*.f64 a 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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((sqrt.f64 (*.f64 (*.f64 a a) 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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((log.f64 (pow.f64 (exp.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((cbrt.f64 (pow.f64 (*.f64 a 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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((expm1.f64 (log1p.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((exp.f64 (log.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((exp.f64 (*.f64 (log.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)) ((log1p.f64 (expm1.f64 (*.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 a (sqrt.f64 8)) (*.f64 (*.f64 a (sqrt.f64 8)) (sqrt.f64 2))) #f)))

simplify50.0ms (0%)

Algorithm

1×	egg-herbie

Rules

1418×	`log-prod`
1296×	`associate-r`
1182×	`fma-def`
1168×	`associate-l`
846×	`associate-+r+`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	67	492
1	150	492
2	524	492
3	3711	490

Stop Event

1×	node limit

Counts

38 → 31

Calls

Call 1

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

Outputs
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))
(-.f64 (exp.f64 (log1p.f64 (*.f64 a (sqrt.f64 8)))) 1)
(*.f64 a (sqrt.f64 8))
(pow.f64 (*.f64 a (sqrt.f64 8)) 1)
(*.f64 a (sqrt.f64 8))
(pow.f64 (sqrt.f64 (*.f64 a (sqrt.f64 8))) 2)
(*.f64 a (sqrt.f64 8))
(pow.f64 (cbrt.f64 (*.f64 a (sqrt.f64 8))) 3)
(*.f64 a (sqrt.f64 8))
(pow.f64 (pow.f64 (*.f64 a (sqrt.f64 8)) 3) 1/3)
(*.f64 a (sqrt.f64 8))
(sqrt.f64 (.f64 8 (.f64 a a)))
(sqrt.f64 (.f64 a (.f64 a 8)))
(fabs.f64 (*.f64 a (sqrt.f64 8)))
(log.f64 (pow.f64 (exp.f64 a) (sqrt.f64 8)))
(*.f64 a (sqrt.f64 8))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 a (sqrt.f64 8)))))
(*.f64 a (sqrt.f64 8))
(cbrt.f64 (pow.f64 (*.f64 a (sqrt.f64 8)) 3))
(*.f64 a (sqrt.f64 8))
(expm1.f64 (log1p.f64 (*.f64 a (sqrt.f64 8))))
(*.f64 a (sqrt.f64 8))
(exp.f64 (log.f64 (*.f64 a (sqrt.f64 8))))
(*.f64 a (sqrt.f64 8))
(exp.f64 (.f64 (log.f64 (.f64 a (sqrt.f64 8))) 1))
(*.f64 a (sqrt.f64 8))
(log1p.f64 (expm1.f64 (*.f64 a (sqrt.f64 8))))
(*.f64 a (sqrt.f64 8))
(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)
(*.f64 a 4)
(pow.f64 (*.f64 a 4) 1)
(*.f64 a 4)
(pow.f64 (*.f64 (sqrt.f64 a) 2) 2)
(*.f64 a 4)
(pow.f64 (cbrt.f64 (*.f64 a 4)) 3)
(*.f64 a 4)
(pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3)
(*.f64 a 4)
(sqrt.f64 (.f64 (.f64 a a) 16))
(*.f64 a 4)
(log.f64 (pow.f64 (exp.f64 a) 4))
(*.f64 a 4)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 a 4))))
(*.f64 a 4)
(cbrt.f64 (pow.f64 (*.f64 a 4) 3))
(*.f64 a 4)
(expm1.f64 (log1p.f64 (*.f64 a 4)))
(*.f64 a 4)
(exp.f64 (log.f64 (*.f64 a 4)))
(*.f64 a 4)
(exp.f64 (.f64 (log.f64 (.f64 a 4)) 1))
(*.f64 a 4)
(log1p.f64 (expm1.f64 (*.f64 a 4)))
(*.f64 a 4)

localize354.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	68.2%	(/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 b (neg.f64 a)))
	59.3%	(sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))
	58.6%	(cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))
✓	50.5%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 b (neg.f64 a)))))

Compiler

Compiled 666 to 314 computations (52.9% saved)

series94.0ms (0.1%)

Counts

2 → 120

Calls

30 calls:

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

rewrite84.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1090×	`add-sqr-sqrt`
1064×	`*-un-lft-identity`
1058×	`pow1`
1006×	`add-exp-log`
1004×	`add-cbrt-cube`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	434
1	1083	434

Stop Event

1×	node limit

Counts

2 → 16

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify246.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1766×	`associate-r`
1194×	`associate-l`
1160×	`associate-/l*`
1154×	`*-commutative`
970×	`associate-/r*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	556	31580
1	1922	31478

Stop Event

1×	node limit

Counts

136 → 208

Calls

Call 1

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

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

localize311.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	77.7%	(sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
✓	75.8%	(-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
✓	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	58.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 723 to 407 computations (43.7% saved)

series97.0ms (0.1%)

Counts

4 → 80

Calls

24 calls:

Time	Variable		Point	Expression
28.0ms	x-scale	@	-inf	(-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
15.0ms	angle	@	0	(-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
8.0ms	x-scale	@	0	(sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
8.0ms	y-scale	@	0	(-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
6.0ms	y-scale	@	inf	(-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))

rewrite127.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

640×	`add-sqr-sqrt`
628×	`*-un-lft-identity`
622×	`pow1`
592×	`add-exp-log`
592×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	29	430
1	632	430

Stop Event

1×	node limit

Counts

4 → 70

Calls

Call 1

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

Outputs
(((.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 1 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)))
(((.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 1 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)))
(((+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 1 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2)) (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (-.f64 (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)))
(((.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((fabs.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (-.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) #f)))

simplify371.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1022×	`associate-r`
766×	`*-commutative`
734×	`times-frac`
664×	`associate-l`
614×	`+-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	638	44280
1	2017	42628

Stop Event

1×	node limit

Counts

150 → 255

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))))))
(.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 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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 (-.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/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)))))) (pow.f64 angle 4)) (.f64 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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 (-.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/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)))))) (pow.f64 angle 4)) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.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 (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 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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 (pow.f64 angle 8) (-.f64 (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (+.f64 (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (.f64 1/11108120260608000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4))) (+.f64 (pow.f64 (-.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)))) 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/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 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (+.f64 (.f64 1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4))) (.f64 1/317374864588800000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)))))))) (+.f64 (.f64 -1/198359290368000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (.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))))) 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (-.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 (.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 1/612220032000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (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/1388515032576000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (.f64 (-.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/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)))))) (pow.f64 angle 4)) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.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 (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 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))) (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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 (.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 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 x-scale 6) (+.f64 (pow.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))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))) 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)))) 8))))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(-.f64 (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(-.f64 (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(-.f64 (+.f64 (.f64 -1 (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (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 y-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)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (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 y-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)))) 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (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))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.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)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.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))) 2))) (.f64 (pow.f64 y-scale 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.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)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.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))) 2))) (.f64 (pow.f64 y-scale 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(/.f64 1 (pow.f64 x-scale 2))
(+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (/.f64 1 (pow.f64 x-scale 2)))
(+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (+.f64 (/.f64 1 (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.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/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (+.f64 (/.f64 1 (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))))) (pow.f64 angle 6)))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.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)))))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (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))) (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (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))) (+.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 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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)))) 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (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 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-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 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(.f64 1 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(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 1/180 (.f64 angle (PI.f64))))))
(exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(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 1/180 (.f64 angle (PI.f64))))))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1))
(+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))
(.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1)
(.f64 1 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2)) (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4)))
(/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)))) 4) (pow.f64 x-scale 4)) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (-.f64 (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1)
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2))
(log.f64 (exp.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(cbrt.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(exp.f64 (log.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1)
(.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(fabs.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))

Outputs
1
(+.f64 1 (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))
(+.f64 1 (.f64 -1/64800 (.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))
(+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2)))))
(+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))))
(+.f64 (.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6))) (+.f64 1 (+.f64 (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4))) (.f64 -1/64800 (.f64 (pow.f64 angle 2) (pow.f64 (PI.f64) 2))))))
(fma.f64 -1/24488801280000000 (.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) (+.f64 1 (fma.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)) (.f64 -1/64800 (.f64 (*.f64 angle angle) (pow.f64 (PI.f64) 2))))))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (.f64 1/180 angle) (PI.f64))
(.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 (*.f64 1/180 angle) (PI.f64)))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 angle (*.f64 (PI.f64) 1/180)))
(+.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 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))))))
(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 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(.f64 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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 angle angle) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.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 (.f64 angle angle) (fma.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) -1/2)))
(+.f64 (.f64 (-.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/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)))))) (pow.f64 angle 4)) (.f64 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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))))))))))
(fma.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.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 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))))))) 2)))))) (pow.f64 angle 4) (.f64 (.f64 angle angle) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.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 (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (pow.f64 angle 4) (.f64 (.f64 angle angle) (fma.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) -1/2))))
(+.f64 (.f64 (-.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/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)))))) (pow.f64 angle 4)) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.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 (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 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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)))))))))))
(fma.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.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 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))))))) 2)))))) (pow.f64 angle 4) (fma.f64 (pow.f64 angle 6) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (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 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/2099520000)))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.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))))))) 2))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) 1/612220032000000))))))) (.f64 (.f64 angle angle) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.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 (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (pow.f64 angle 4) (fma.f64 (pow.f64 angle 6) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (+.f64 (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/3149280000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/765275040000000)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/612220032000000))))) -1/2)) (.f64 (.f64 angle angle) (fma.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) -1/2)))))
(+.f64 (.f64 (pow.f64 angle 8) (-.f64 (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (+.f64 (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))) (+.f64 (.f64 1/11108120260608000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4))) (+.f64 (pow.f64 (-.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)))) 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/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 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (+.f64 (.f64 1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4))) (.f64 1/317374864588800000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)))))))) (+.f64 (.f64 -1/198359290368000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (pow.f64 (.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))))) 2) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (-.f64 (+.f64 (.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (+.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 (.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4))) (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (+.f64 (.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (-.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 (.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 1/612220032000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (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/1388515032576000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))) (+.f64 (.f64 (-.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/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)))))) (pow.f64 angle 4)) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.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 (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 (pow.f64 angle 2) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.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))))))))))))
(fma.f64 (pow.f64 angle 8) (+.f64 (fma.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale x-scale)) 1/352638738432000000000)) (.f64 -1/2 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 4 (fma.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 x-scale x-scale))) (fma.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 -1/3149280000 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)))))))) (fma.f64 1/11108120260608000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)) (+.f64 (pow.f64 (-.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)))) 2) (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) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) 1/765275040000000))) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)) 1/176319369216000000000))))) (fma.f64 -1/198359290368000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (+.f64 (pow.f64 (.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 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/2099520000)))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.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))))))) 2))))) 2) (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 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (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))))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (fma.f64 1/102036672000000 (/.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/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))))))) (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) (+.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 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))))))) 2))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) 1/612220032000000)))))) (/.f64 (.f64 -1/1388515032576000000000 (pow.f64 (PI.f64) 8)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (fma.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) 1/3149280000) (.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 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))))))) 2)))))) (pow.f64 angle 4) (fma.f64 (pow.f64 angle 6) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (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 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/2099520000)))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.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))))))) 2))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) 1/612220032000000))))))) (.f64 (.f64 angle angle) (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (.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 (pow.f64 angle 8) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale x-scale)) 1/347128758144000000000) (.f64 (.f64 x-scale (.f64 x-scale (-.f64 (fma.f64 4 (fma.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 8) -1/765275040000000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 8) 1/765275040000000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 8) 1/3149280000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale))))))))) (fma.f64 1/11108120260608000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) 2) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000))) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 4)) 1/176319369216000000000))))) (fma.f64 -1/198359290368000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))) (.f64 (.f64 x-scale x-scale) 1/2)) 2) (fma.f64 1/2 (.f64 (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (+.f64 (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/3149280000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/765275040000000)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/612220032000000)))) (.f64 (pow.f64 x-scale 4) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/1388515032576000000000))))))) -1/2)) (fma.f64 (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (pow.f64 angle 4) (fma.f64 (pow.f64 angle 6) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) -1/765275040000000) (.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (+.f64 (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/3149280000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/765275040000000)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/612220032000000))))) -1/2)) (.f64 (.f64 angle angle) (fma.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))) -1/2))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))))
(.f64 -1/2 (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))) 2))))))
(.f64 -1/2 (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))) (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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)))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2)))) (.f64 1/4 (/.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (.f64 1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))) 2))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-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)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 x-scale 6) (+.f64 (pow.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))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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)))) 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)))) 8))))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2)))) (fma.f64 1/4 (/.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (.f64 1/2 (/.f64 (pow.f64 x-scale 6) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (.f64 -1/4 (/.f64 (pow.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) 2) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 8) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))))))))))))
(fma.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) 2)) (.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2) (.f64 -1/4 (.f64 (/.f64 (pow.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))))))))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))
(-.f64 (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(+.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (/.f64 y-scale (/.f64 (pow.f64 x-scale 4) y-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (-.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6))) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale))) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))
(-.f64 (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.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 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(+.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (/.f64 y-scale (/.f64 (pow.f64 x-scale 4) y-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))
(-.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (-.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6))) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 (/.f64 y-scale x-scale) (/.f64 y-scale x-scale))) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))))
(.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (*.f64 y-scale y-scale))
(-.f64 (+.f64 (.f64 -1 (/.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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (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 y-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)))) 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 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 (fma.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))
(+.f64 (-.f64 (fma.f64 -1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (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 y-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)))) 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (fma.f64 -1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))
(+.f64 (-.f64 (fma.f64 -1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 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))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))
(.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(+.f64 (.f64 -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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(.f64 -1/2 (+.f64 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))))))
(+.f64 (.f64 -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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.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)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.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))) 2))) (.f64 (pow.f64 y-scale 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 8) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 8) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (pow.f64 y-scale 8))) (fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) 2) (pow.f64 x-scale 8))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))
(.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2))))
(+.f64 (.f64 -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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))
(.f64 -1/2 (+.f64 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))
(+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))))))
(+.f64 (.f64 -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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.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)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.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))) 2))) (.f64 (pow.f64 y-scale 8) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 8) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 8) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) 2)))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (pow.f64 y-scale 8))) (fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (.f64 (pow.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) 2) (pow.f64 x-scale 8))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)))) 2))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (.f64 -1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2) 2)))))))
(/.f64 1 (pow.f64 x-scale 2))
(/.f64 1 (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (/.f64 1 (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (+.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 (*.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (/.f64 1 (.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (+.f64 (/.f64 1 (pow.f64 x-scale 2)) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.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 (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (+.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 (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 angle 4) (-.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 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))))))) 2)))))))
(+.f64 (fma.f64 1/2 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (/.f64 1 (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))) (.f64 (pow.f64 angle 4) (*.f64 x-scale x-scale)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))) (pow.f64 angle 2)))) (+.f64 (/.f64 1 (pow.f64 x-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (-.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))))))) (pow.f64 angle 6)))) (.f64 1/2 (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (+.f64 (.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 (fma.f64 1/2 (.f64 (.f64 x-scale x-scale) (.f64 (.f64 angle angle) (+.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 (.f64 x-scale x-scale))) (.f64 1/2 (+.f64 (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 angle 6) (-.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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (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 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 4)) 1/2099520000)))) (fma.f64 -1/1574640000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (.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))))))) 2))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) 1/612220032000000)))))) (.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 angle 4) (-.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 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))))))) 2))))))))
(+.f64 (fma.f64 1/2 (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) (/.f64 1 (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (fma.f64 -1/6122200320000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (fma.f64 2 (.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 x-scale x-scale) 1/3149280000)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000))) (fma.f64 -1/408146688000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 4)) (.f64 4 (+.f64 (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 6) 1/3149280000) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/765275040000000)))))) (fma.f64 1/1020366720000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (fma.f64 1/2 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))))) 2))))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) 1/612220032000000))))) (.f64 (pow.f64 angle 4) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) -1/196830000) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (-.f64 (.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 x-scale (.f64 x-scale (.f64 y-scale y-scale)))) (pow.f64 (.f64 1/2 (.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 -1/16200 (/.f64 (pow.f64 x-scale 4) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 1/16200 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))) 2))))))))))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (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))) (+.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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2)))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (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))) (+.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 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2)))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 -1/4 (/.f64 (.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 -1/4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2))))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6))) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.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 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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)))) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 x-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2))))) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))
(fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (.f64 x-scale x-scale))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6))) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)))) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))) 2)) (pow.f64 x-scale 4))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale 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 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale 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 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-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)))) 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 1/2 (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6) (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2)) (fma.f64 1/2 (.f64 (/.f64 y-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6)) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 2 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (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 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale 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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (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 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale 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)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.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))) (.f64 (pow.f64 y-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2))) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 6))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2)))) 2)) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 x-scale x-scale)) 2) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)))))) (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2) (/.f64 x-scale (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))))) 2)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (fma.f64 1/2 (.f64 (.f64 (/.f64 x-scale y-scale) (/.f64 x-scale y-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)))))
(.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 1 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sqrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (cbrt.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (cbrt.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (cbrt.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))))
(.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (cbrt.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2)
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))
(sqrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(fabs.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(fabs.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))))
(fabs.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cbrt.f64 (.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(cbrt.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(expm1.f64 (log1p.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (log.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log1p.f64 (expm1.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(cos.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 1)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2))))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 1)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 1/2)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(fabs.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))
(fabs.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))))
(fabs.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))
(cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 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 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1)
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 1 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(.f64 (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 2)) (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(.f64 (cbrt.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (cbrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))))))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) (-.f64 (/.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) x-scale) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4)))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) x-scale) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) (-.f64 (/.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) x-scale) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) 1/4)))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) x-scale) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 1/4)) (-.f64 (/.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) x-scale) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)) 1/4)))
(/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 1 (/.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2))))
(.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (/.f64 1 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 1)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (-.f64 (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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)) (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) 3) (neg.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))) 3))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (+.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 1))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 1 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 3/2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.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)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 3/2))) (neg.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))))
(.f64 1 (/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 3/2)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (pow.f64 x-scale 4)) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))))
(pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1)
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) 2))
(sqrt.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 2))
(log.f64 (exp.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(cbrt.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(cbrt.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(cbrt.f64 (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))) 2)))
(expm1.f64 (log1p.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(exp.f64 (log.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(log1p.f64 (expm1.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-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 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 1 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2)) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(fabs.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(fabs.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2))))
(fabs.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(cbrt.f64 (pow.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 3/2))
(cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)) 3/2))
(cbrt.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)) 3/2))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.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 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 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale))) 2)))

localize367.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	74.9%	(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))
✓	73.2%	(.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	58.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 945 to 499 computations (47.2% saved)

series55.0ms (0%)

Counts

2 → 96

Calls

24 calls:

Time	Variable		Point	Expression
6.0ms	angle	@	0	(.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
6.0ms	angle	@	0	(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))
5.0ms	x-scale	@	inf	(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))
5.0ms	y-scale	@	inf	(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))
4.0ms	y-scale	@	0	(-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))

rewrite72.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

834×	`add-sqr-sqrt`
822×	`*-un-lft-identity`
814×	`pow1`
772×	`add-exp-log`
772×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	360
1	819	360

Stop Event

1×	node limit

Counts

2 → 24

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify218.0ms (0.2%)

Algorithm

1×	egg-herbie

Rules

1238×	`associate-r`
1210×	`associate-/r*`
1178×	`associate-/l*`
924×	`associate-l`
806×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	486	38568
1	1833	37826

Stop Event

1×	node limit

Counts

120 → 114

Calls

Call 1

Inputs
(.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))
(+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 4) (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 b 4))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))
(+.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 b 4) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 6) (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 b 4))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 b 4) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 angle 6) (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 8) (.f64 (+.f64 (.f64 -1/32400 (.f64 (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (+.f64 (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8)) (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4))))))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 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 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(.f64 -1 (/.f64 (.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 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (/.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 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(.f64 -1 (/.f64 (.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 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (/.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 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))))) (pow.f64 b 2))) 2))) (pow.f64 b 2)))))))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.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 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 6)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (.f64 2 (.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2)))) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))) 2)))) (pow.f64 b 4)))) (pow.f64 x-scale 2)) (pow.f64 b 2))))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))))) (pow.f64 b 2))) 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)) (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 (.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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)) (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)) (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)) (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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (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 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (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 x-scale 2) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(-.f64 (+.f64 (/.f64 (.f64 (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 x-scale 2) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 x-scale 8) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 x-scale 8) (.f64 (pow.f64 b 2) (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 y-scale y-scale)) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))
(/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (pow.f64 b 4) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 y-scale y-scale))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(pow.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))) 1)
(log.f64 (exp.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(cbrt.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))))))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(exp.f64 (log.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(+.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (*.f64 y-scale y-scale))))
(.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) 1)
(.f64 1 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(.f64 (sqrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (sqrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(.f64 (.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))) 3)) (+.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(pow.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))) 1)
(log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(cbrt.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(expm1.f64 (log1p.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(exp.f64 (log.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(log1p.f64 (expm1.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))

Outputs
(.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))
(.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))))
(.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (*.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))))
(+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 4) (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 b 4))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))
(fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 angle 4) (/.f64 (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))) (.f64 (pow.f64 b 4) (.f64 (pow.f64 (PI.f64) 4) -1/787320000)))))
(fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 (pow.f64 angle 4) (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale))) (.f64 (pow.f64 (PI.f64) 4) (.f64 -1/787320000 (pow.f64 b 4)))))
(+.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 b 4) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 6) (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 b 4))) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))
(+.f64 (/.f64 (pow.f64 angle 4) (/.f64 (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))) (.f64 (pow.f64 b 4) (.f64 (pow.f64 (PI.f64) 4) -1/787320000)))) (fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 angle 6) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000)))) (*.f64 x-scale x-scale)))))
(+.f64 (.f64 (/.f64 (pow.f64 angle 6) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 6) 17/1530550080000000)) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4)))) (fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 (pow.f64 angle 4) (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale))) (.f64 (pow.f64 (PI.f64) 4) (.f64 -1/787320000 (pow.f64 b 4))))))
(+.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 (pow.f64 b 4) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (+.f64 (/.f64 (.f64 (pow.f64 angle 6) (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 angle 2) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (/.f64 (.f64 (pow.f64 angle 8) (.f64 (+.f64 (.f64 -1/32400 (.f64 (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8)) (+.f64 (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8)) (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4))))))) (pow.f64 b 4))) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(+.f64 (/.f64 (pow.f64 angle 4) (/.f64 (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))) (.f64 (pow.f64 b 4) (.f64 (pow.f64 (PI.f64) 4) -1/787320000)))) (+.f64 (.f64 (/.f64 (pow.f64 angle 6) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000)))) (.f64 x-scale x-scale))) (fma.f64 1/32400 (.f64 (/.f64 (.f64 angle angle) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale))) (/.f64 (.f64 (pow.f64 angle 8) (.f64 (pow.f64 b 4) (fma.f64 -1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (fma.f64 -1/2777030065152000000000 (pow.f64 (PI.f64) 8) (fma.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8) (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 -1/3149280000 (.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))))) (.f64 y-scale (.f64 y-scale (*.f64 x-scale x-scale)))))))
(+.f64 (.f64 (/.f64 (pow.f64 angle 4) (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale))) (.f64 (pow.f64 (PI.f64) 4) (.f64 -1/787320000 (pow.f64 b 4)))) (+.f64 (fma.f64 1/32400 (/.f64 (.f64 angle angle) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))) (.f64 (/.f64 (pow.f64 angle 6) (.f64 y-scale y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 4) (.f64 1/3149280000 (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 (PI.f64) 6) 17/1530550080000000)) (/.f64 (.f64 x-scale x-scale) (pow.f64 b 4))))) (.f64 (/.f64 (pow.f64 angle 8) (.f64 x-scale x-scale)) (/.f64 (fma.f64 -1/32400 (.f64 (.f64 (pow.f64 (PI.f64) 2) (pow.f64 (PI.f64) 6)) 1/765275040000000) (+.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 6) (.f64 -1/765275040000000 (pow.f64 (PI.f64) 2))) (.f64 -1/3149280000 (.f64 (pow.f64 (PI.f64) 8) 1/3149280000))) (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000))) (/.f64 (.f64 y-scale y-scale) (pow.f64 b 4))))))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.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 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (sqrt.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))
(.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))
(.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))
(.f64 -1/2 (+.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))) 1/2) 2))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(fma.f64 -1/2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 b 6)) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2)))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(fma.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))) 1/2) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2) (.f64 -1/4 (.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (pow.f64 b 8)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))) (fma.f64 -1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4))) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))) 1/2) 2))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))))
(fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) 2) (/.f64 (.f64 -1/4 (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2))) (/.f64 (pow.f64 b 8) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))))))) (fma.f64 -1/2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 4) (pow.f64 b 6)) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 x-scale 4)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2) 2))))) (.f64 -1/2 (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 b b)))))))
(.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))
(neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))
(.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (neg.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (/.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 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (+.f64 (.f64 (.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6)) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))))) (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 (.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))))
(.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))
(neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))
(.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (neg.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (/.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 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))))
(-.f64 (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (+.f64 (.f64 (.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2)))) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)))) (.f64 (pow.f64 y-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1 (/.f64 (.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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) 2))) (.f64 (pow.f64 y-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 x-scale 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))) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6)) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))))))) (+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 (.f64 -1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 b (/.f64 x-scale b)))) (/.f64 (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale))) (/.f64 (.f64 4 (pow.f64 b 4)) (/.f64 (/.f64 x-scale (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) x-scale)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))))))
(*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))
(neg.f64 (/.f64 b (/.f64 (*.f64 x-scale x-scale) b)))
(neg.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale)))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))))
(fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))))) (neg.f64 (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))
(fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))) (.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))))))) (neg.f64 (*.f64 (/.f64 b x-scale) (/.f64 b x-scale))))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))))) (pow.f64 b 2))) 2))) (pow.f64 b 2)))))))
(fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))))) (fma.f64 -1 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (-.f64 (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)))))) (fma.f64 4 (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/787320000) (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2)))))))))
(fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))) (.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))))))) (fma.f64 -1 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4))) (.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (-.f64 (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) 1/3149280000)) (.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) 1/3149280000))) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) 2) (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/196830000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (*.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2)))))) 2))))))))
(+.f64 (.f64 (pow.f64 angle 6) (-.f64 (/.f64 (.f64 (pow.f64 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.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 b 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (pow.f64 y-scale 2))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 6)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) (.f64 2 (.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 4) (.f64 (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2)))) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))) 2)))) (pow.f64 b 4)))) (pow.f64 x-scale 2)) (pow.f64 b 2))))) (+.f64 (.f64 (pow.f64 angle 2) (-.f64 (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (pow.f64 x-scale 2))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (pow.f64 b 2))))) (+.f64 (.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2))) (.f64 (pow.f64 angle 4) (-.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (+.f64 (.f64 2 (/.f64 (.f64 (pow.f64 b 2) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)) (pow.f64 x-scale 2)) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))) (+.f64 (pow.f64 (-.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 x-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) 2) (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 1/8100 (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 2 (/.f64 (.f64 (pow.f64 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 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (pow.f64 x-scale 2))))) (pow.f64 b 2))) 2))) (pow.f64 b 2))))))))
(fma.f64 (pow.f64 angle 6) (+.f64 (/.f64 (.f64 b b) (/.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 (.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 x-scale x-scale) (.f64 b b))) (fma.f64 4 (fma.f64 1/102036672000000 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale))) (+.f64 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale)))) (.f64 1/32400 (/.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (.f64 y-scale (.f64 y-scale (.f64 x-scale x-scale))))))) (.f64 2 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)))))))) (.f64 -1/2 (/.f64 (pow.f64 x-scale 4) (/.f64 (pow.f64 b 4) (.f64 (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))) (-.f64 (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)))))) (fma.f64 4 (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/787320000) (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)))))))) 2))))))) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))))))))) (fma.f64 -1 (/.f64 b (/.f64 (.f64 x-scale x-scale) b)) (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale))) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (-.f64 (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 x-scale x-scale) (.f64 b b))) (.f64 1/3149280000 (/.f64 (.f64 (pow.f64 (PI.f64) 4) (.f64 b b)) (.f64 y-scale y-scale)))))) (fma.f64 4 (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/787320000) (pow.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) 2))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (.f64 b b) (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (+.f64 (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (PI.f64) 2)))) (.f64 -1/32400 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))) (.f64 1/8100 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 x-scale x-scale)))))))) 2))))))))))
(fma.f64 (pow.f64 angle 6) (+.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 b b))) (.f64 y-scale y-scale)) (.f64 -1/2 (.f64 (/.f64 (+.f64 (fma.f64 2 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (-.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (/.f64 (.f64 (pow.f64 (PI.f64) 6) (.f64 1/765275040000000 (.f64 b b))) (.f64 y-scale y-scale))))) (fma.f64 4 (fma.f64 1/102036672000000 (.f64 (/.f64 (pow.f64 b 4) (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale))) (pow.f64 (PI.f64) 6)) (+.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 x-scale x-scale) 1/765275040000000))) (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2)) 1/3149280000))))) (.f64 (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (.f64 (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) 1/3149280000)) (.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) 1/3149280000)) 2)))) (.f64 -1/2 (.f64 (/.f64 (pow.f64 x-scale 4) (pow.f64 b 4)) (.f64 (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2)))) (-.f64 (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) 1/3149280000)) (.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) 1/3149280000))) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) 2) (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/196830000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2)))))) 2)))))) b) (/.f64 x-scale (/.f64 b x-scale))))) (fma.f64 (.f64 angle angle) (+.f64 (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))) (.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (PI.f64) 2))))))) (fma.f64 -1 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 (pow.f64 angle 4) (+.f64 (.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4))) (.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (-.f64 (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (+.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) 1/3149280000)) (.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) 1/3149280000))) (+.f64 (pow.f64 (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) 2) (.f64 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) -1/196830000))) (pow.f64 (.f64 1/2 (.f64 (/.f64 x-scale (/.f64 b (/.f64 x-scale b))) (fma.f64 2 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (.f64 -1/32400 (+.f64 (.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)) (pow.f64 (PI.f64) 2)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2))))) (/.f64 1/8100 (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 b 4)) (pow.f64 (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)) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (/.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 (pow.f64 (-.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 -1 (/.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))
(.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (neg.f64 (.f64 (/.f64 b x-scale) (/.f64 b 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 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -1 (+.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b)))))
(+.f64 (fma.f64 -1 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (.f64 -1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))))
(-.f64 (+.f64 (/.f64 (.f64 (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 x-scale 2) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (-.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (-.f64 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -1 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (fma.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (neg.f64 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -1 (+.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 y-scale 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (neg.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (.f64 -1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 b b))))))
(-.f64 (+.f64 (/.f64 (.f64 (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 x-scale 2) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (.f64 (pow.f64 b 4) (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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1 (/.f64 (.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 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -1 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2)))))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (-.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 b b)) (/.f64 (-.f64 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -1 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (fma.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (neg.f64 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 1/4 (/.f64 (fma.f64 -1 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (fma.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (neg.f64 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 b 4) (/.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -1 (+.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) 2))))) (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b)))))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -1 (+.f64 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 y-scale 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) 2))) (fma.f64 1/4 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (/.f64 (/.f64 (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6)) (pow.f64 x-scale 4)) (-.f64 (.f64 (/.f64 (pow.f64 b 4) (pow.f64 y-scale 4)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) 2)))) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (neg.f64 (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (.f64 -1/2 (/.f64 (fma.f64 -1 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) 3)) (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b)))))
(.f64 (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 b b))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (*.f64 b b))))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (*.f64 b b)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 6))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 x-scale 8) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (.f64 b b)))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (/.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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/4 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 b 8)) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 8))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 6))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 b (/.f64 y-scale b)))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2) (.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2)))))
(.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b)))))
(.f64 (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 b b))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (*.f64 b b))))))
(.f64 -1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))))) 2)))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (*.f64 b b)))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 6))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)))) (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 y-scale y-scale)))))))) 2))))))
(+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 x-scale 4) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (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 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2)) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))))) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8)))))) (.f64 (pow.f64 x-scale 8) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2))) (.f64 (pow.f64 b 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 2) (.f64 b b)))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (/.f64 (+.f64 (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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/4 (.f64 (/.f64 (pow.f64 y-scale 8) (pow.f64 b 8)) (/.f64 (.f64 (fma.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 b b)) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 y-scale y-scale)) (.f64 4 (.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-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)))) 8))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 6) (/.f64 (/.f64 (.f64 (pow.f64 b 6) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 6) (pow.f64 x-scale 6))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 b b) (pow.f64 x-scale 4)))) (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 1/2 (/.f64 y-scale (/.f64 b (/.f64 y-scale b)))) (/.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) 2) (.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 b 8) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 8))) (.f64 (-.f64 (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4)) (pow.f64 (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))))) 2)) (.f64 (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))))) (fma.f64 4 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)))) (.f64 -2 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))))))))))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 b b))) 1/2)))))
(/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (pow.f64 b 4) x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) (*.f64 y-scale y-scale))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (.f64 y-scale y-scale) (*.f64 x-scale x-scale)))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(pow.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))) 1)
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(log.f64 (exp.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(cbrt.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))))))
(cbrt.f64 (pow.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))) 3))
(cbrt.f64 (pow.f64 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2))) 3))
(expm1.f64 (log1p.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(exp.f64 (log.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(log1p.f64 (expm1.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))
(.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))
(/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 2)))
(+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(+.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (*.f64 y-scale y-scale))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) 1)
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 1 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 (sqrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (sqrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(.f64 (.f64 (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))) (cbrt.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))))) (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale))))))))
(/.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))) (fma.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2)))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4)))) 3)) (+.f64 (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) (+.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) 3) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))))) 3)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (+.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)))) (.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))) 3)) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))) (+.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))))))
(pow.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))) 1)
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(cbrt.f64 (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale)) 4))))) (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4))))))))
(cbrt.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 4 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) x-scale))))))) 3))
(cbrt.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2)))) 3))
(expm1.f64 (log1p.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(exp.f64 (log.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(log1p.f64 (expm1.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 b 4) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 b (/.f64 (.f64 x-scale x-scale) b))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))
(-.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 (.f64 y-scale x-scale) (.f64 y-scale x-scale)) (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)))) 2))))

localize461.0ms (0.3%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	58.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	56.4%	(/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
✓	56.4%	(fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))

Compiler

Compiled 1614 to 820 computations (49.2% saved)

series98.0ms (0.1%)

Counts

2 → 96

Calls

24 calls:

Time	Variable		Point	Expression
37.0ms	b	@	inf	(/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
14.0ms	angle	@	0	(/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
5.0ms	a	@	0	(fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))
4.0ms	a	@	inf	(/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
3.0ms	angle	@	0	(fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2)))))

rewrite82.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

896×	`add-sqr-sqrt`
882×	`*-un-lft-identity`
876×	`pow1`
828×	`add-exp-log`
828×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	39	654
1	879	654

Stop Event

1×	node limit

Counts

2 → 26

Calls

Call 1

Inputs

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

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

Outputs

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

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

simplify416.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1328×	`associate-r`
1016×	`associate-/l*`
1012×	`associate-l`
962×	`associate-/r*`
760×	`*-commutative`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	568	55920
1	2038	55920

Stop Event

1×	node limit

Counts

122 → 151

Calls

Call 1

Inputs
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 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 b 4)))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 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 b 4)))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2)))
(+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))))))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (.f64 (+.f64 (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (+.f64 (.f64 (pow.f64 b 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 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (.f64 4 (/.f64 (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2)))) (pow.f64 angle 6)))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4)) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)))))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4)) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4))
(+.f64 (.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4))
(+.f64 (.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 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 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 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 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 2)) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 b 4)))))
(+.f64 (.f64 -2 (/.f64 (.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 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 2)) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 b 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)))) (pow.f64 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 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))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/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 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 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))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 (+.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))) (pow.f64 b 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (+.f64 (.f64 (+.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/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 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))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (pow.f64 b 2))))) (pow.f64 angle 6)) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 (+.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))) (pow.f64 b 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 2)))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 -2 (/.f64 (.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (+.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -2 (/.f64 (.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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (+.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (.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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))
(+.f64 (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))
(.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) 1)
(.f64 1 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))))
(.f64 (sqrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (sqrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))))
(.f64 (.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(pow.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))) 1)
(log.f64 (exp.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(cbrt.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))))
(expm1.f64 (log1p.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(exp.f64 (log.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(log1p.f64 (expm1.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (/.f64 1 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))) 1)
(.f64 1 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(.f64 (sqrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (sqrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))
(.f64 (.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(.f64 (/.f64 1 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))
(pow.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 1)
(log.f64 (exp.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(cbrt.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))
(expm1.f64 (log1p.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(exp.f64 (log.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(log1p.f64 (expm1.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))

Outputs
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2)
(.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2))
(fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 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) (pow.f64 b 4))
(.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 2 (pow.f64 b 4)))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 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 b 4)))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (.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 b 4)))
(fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 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) (pow.f64 b 4))
(.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 2 (pow.f64 b 4)))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 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 b 4)))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (.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 b 4)))
(fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4)))))
(+.f64 (.f64 (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (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))) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 4)))))
(fma.f64 (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 -8 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 a a)) (.f64 y-scale y-scale)))) (.f64 b b) (+.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 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 b 4))))
(+.f64 (.f64 2 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (fma.f64 (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (/.f64 -8 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 b b) (.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 2 (pow.f64 b 4)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -2 (.f64 (+.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 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 y-scale 2))
(/.f64 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (*.f64 y-scale y-scale))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (*.f64 y-scale y-scale))
(.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2)))
(.f64 -2 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))
(/.f64 (.f64 (.f64 -2 a) a) (/.f64 y-scale (/.f64 b (/.f64 y-scale b))))
(+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))))
(fma.f64 -2 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2)))))))
(fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (/.f64 1/8100 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (-.f64 (.f64 b b) (*.f64 a a)) 2) (pow.f64 (PI.f64) 2)))))))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (*.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))))))
(fma.f64 (pow.f64 angle 4) (fma.f64 4 (/.f64 (.f64 (pow.f64 (PI.f64) 4) -1/787320000) (/.f64 (.f64 y-scale y-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (fma.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 b b) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.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) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))))) (fma.f64 -2 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (*.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))))))
(fma.f64 (pow.f64 angle 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 y-scale y-scale) -1/787320000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 -2 (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (.f64 b b) (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))))) (fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b b)) (.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (/.f64 1/8100 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (PI.f64) 2))))))))
(+.f64 (.f64 (pow.f64 angle 4) (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2))))))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (.f64 1/8100 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))))) (.f64 (+.f64 (.f64 -2 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (+.f64 (.f64 (pow.f64 b 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 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (pow.f64 y-scale 2)))))) (.f64 4 (/.f64 (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (pow.f64 y-scale 2)))) (pow.f64 angle 6)))))
(fma.f64 (pow.f64 angle 4) (fma.f64 4 (/.f64 (.f64 (pow.f64 (PI.f64) 4) -1/787320000) (/.f64 (.f64 y-scale y-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (fma.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 b b) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.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) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))))) (fma.f64 -2 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))))) (.f64 (fma.f64 -2 (fma.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/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (fma.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (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 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 4 (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000))) (/.f64 (.f64 y-scale y-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (pow.f64 angle 6)))))
(fma.f64 (pow.f64 angle 4) (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 y-scale y-scale) -1/787320000)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 -2 (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (.f64 b b) (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))))) (fma.f64 -2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 b b)) (fma.f64 (.f64 angle angle) (fma.f64 -2 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (/.f64 1/8100 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (PI.f64) 2))))) (.f64 (fma.f64 -2 (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (pow.f64 (PI.f64) 6) (.f64 -1/765275040000000 (.f64 b b)))) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 4 (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000))) (/.f64 (.f64 y-scale y-scale) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (pow.f64 angle 6)))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))))
(+.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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))))
(fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (*.f64 y-scale y-scale))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))))))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 a (.f64 a (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4)))))))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4)) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)))))))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4)) (.f64 (pow.f64 a 2) (+.f64 (.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))) (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)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)))))))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4))
(.f64 (pow.f64 a 4) (.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 (.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 2 (pow.f64 a 4)))
(+.f64 (.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))
(fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))
(fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 4))
(.f64 (pow.f64 a 4) (.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 (.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 2 (pow.f64 a 4)))
(+.f64 (.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))
(fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))
(fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))))
(+.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))) (pow.f64 y-scale 2))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 (+.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))) (pow.f64 y-scale 2))) (.f64 -2 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))))) (pow.f64 a 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 a 4)))))
(fma.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (fma.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 a 4) (.f64 (.f64 a a) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 -2 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))))))))
(fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (fma.f64 (fma.f64 -8 (.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 b b))) (.f64 -2 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))))) (.f64 a a) (.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 2 (pow.f64 a 4))))))
(/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))
(/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))
(/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)) 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 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 2))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 (.f64 b b) (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4)))))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 (.f64 b b) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) 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 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 2)) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 b 4)))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 b b) (.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) 2)))) (.f64 b b) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) (.f64 (/.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) (.f64 a a))) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4) 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 (.f64 -1 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 (pow.f64 b 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 b 2)) (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2))))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))) (pow.f64 b 4))))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 6)))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 b b) (.f64 (pow.f64 b 4) (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (.f64 (/.f64 (.f64 (.f64 (pow.f64 a 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))
(fma.f64 -2 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 -1 (.f64 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) (.f64 (/.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) (.f64 a a))) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 b 6))) (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (fma.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) 2)))) (.f64 b b) (.f64 (pow.f64 b 4) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 a a))) (.f64 (/.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) (.f64 a a))) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))) (.f64 -8 (/.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) (pow.f64 a 4)) (/.f64 (/.f64 (pow.f64 a 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.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)))) 2) (*.f64 b b)))
(/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 b b)) 2))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(-.f64 (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))
(-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (fma.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (+.f64 (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (*.f64 b b)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -2 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 b b) (.f64 a a))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 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))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (fma.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (.f64 (/.f64 (pow.f64 a 4) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))))))) (+.f64 (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b b)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 b 4) (-.f64 (.f64 2 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (fma.f64 -2 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 b b) (.f64 a a))))))
(/.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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))
(/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.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)))) 2) (*.f64 b b)))
(/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 b b)) 2))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale))))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(-.f64 (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))
(-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (fma.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale))))))) (+.f64 (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (*.f64 b b)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -2 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))))) (+.f64 (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 b b) (.f64 a a))))))
(-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 b 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 2) (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 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))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)))) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (/.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)))) 2) (.f64 b b))) (fma.f64 4 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (.f64 (/.f64 (pow.f64 a 4) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (pow.f64 a 4) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))))))) (+.f64 (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (-.f64 (fma.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)))) 4))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 y-scale y-scale)))) (/.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) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)) (.f64 b b)))))
(-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (/.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)) (fma.f64 4 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -1 (.f64 (/.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (pow.f64 b 4) (-.f64 (.f64 2 (.f64 (/.f64 (pow.f64 a 4) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))))) (fma.f64 -2 (.f64 (/.f64 (pow.f64 a 4) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (+.f64 (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 a a))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(/.f64 (+.f64 (.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (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 -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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.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 y-scale 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 (fma.f64 4 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (.f64 -2 (fma.f64 (.f64 a a) (pow.f64 (cos.f64 (.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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.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 (-.f64 (.f64 b b) (.f64 a a)) 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 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))))
(*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))
(.f64 -2 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))
(.f64 (/.f64 a y-scale) (.f64 (/.f64 a y-scale) -2))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (.f64 -2 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))) (.f64 (/.f64 a y-scale) (*.f64 (/.f64 a y-scale) -2)))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 (+.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))) (pow.f64 b 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2)))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (fma.f64 (pow.f64 angle 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) -1/787320000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 b b))) (.f64 -2 (/.f64 (fma.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 b b) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.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) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (.f64 b b)))) (fma.f64 -2 (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 a a))) (/.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (/.f64 (.f64 b b) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))))) (.f64 -2 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))) (fma.f64 (pow.f64 angle 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 b b) -1/787320000))) (/.f64 (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (.f64 b b) (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))) (/.f64 (.f64 b b) -2))) (fma.f64 -2 (.f64 (/.f64 a (/.f64 (.f64 b b) a)) (/.f64 (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 y-scale y-scale))) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 b b) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))))))) (.f64 (/.f64 a y-scale) (*.f64 (/.f64 a y-scale) -2))))
(+.f64 (.f64 (pow.f64 angle 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))))) (+.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 1/32400 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2))) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (+.f64 (.f64 1/102036672000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6))))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (+.f64 (.f64 (+.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/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (.f64 (pow.f64 b 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))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 b 2) (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4)))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (.f64 (+.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 -1/3149280000 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 4)) (pow.f64 y-scale 2)))) (pow.f64 b 2)) (+.f64 (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2)))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2)))) (pow.f64 b 2))))) (pow.f64 angle 6)) (+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (/.f64 (.f64 (+.f64 (.f64 -1/1049760000 (pow.f64 (PI.f64) 4)) (.f64 -1/3149280000 (pow.f64 (PI.f64) 4))) (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (+.f64 (.f64 (+.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))) (pow.f64 b 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))))) (pow.f64 b 2)))) (+.f64 (.f64 -2 (/.f64 (.f64 (+.f64 (.f64 -1/3149280000 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 4))) (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 b 2))) (pow.f64 a 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 y-scale 2)) (.f64 (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2))) (.f64 1/32400 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2)) (pow.f64 y-scale 2)))) (pow.f64 b 2))) (pow.f64 b 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 b 2))))) (.f64 -2 (/.f64 (.f64 (pow.f64 a 2) (+.f64 (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (+.f64 (.f64 1/32400 (.f64 (pow.f64 a 2) (pow.f64 (PI.f64) 2))) (.f64 -1/32400 (.f64 (pow.f64 b 2) (pow.f64 (PI.f64) 2))))) (pow.f64 b 2))))) (*.f64 -2 (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (fma.f64 (-.f64 (fma.f64 4 (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000))) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 -2 (/.f64 (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (fma.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/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (fma.f64 (.f64 b b) (+.f64 (/.f64 (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)))) (/.f64 (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 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 b b)))) (fma.f64 -2 (/.f64 (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 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 a a))) (+.f64 (/.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) -1/787320000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 b b))) (.f64 -2 (/.f64 (fma.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 b b) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.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) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (.f64 b b)))) (fma.f64 -2 (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 a a))) (/.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (/.f64 (.f64 b b) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))))) (/.f64 (.f64 b b) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (/.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (/.f64 (.f64 b b) (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)))))))) (pow.f64 angle 6) (fma.f64 (pow.f64 angle 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) -1/787320000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 b b))) (.f64 -2 (/.f64 (fma.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 b b) (fma.f64 (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.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) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 y-scale y-scale) (.f64 a a))))) (.f64 b b)))) (fma.f64 -2 (/.f64 (fma.f64 -1/3149280000 (.f64 (.f64 a a) (pow.f64 (PI.f64) 4)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (.f64 a a))) (/.f64 (+.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))) (.f64 (.f64 b b) (fma.f64 -1/32400 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (PI.f64) 2))) (.f64 1/32400 (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)) (.f64 y-scale y-scale)))))) (.f64 b b)) (.f64 1/8100 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (pow.f64 (PI.f64) 2))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))) (.f64 b b))))) (/.f64 (.f64 b b) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 -1/32400 (.f64 (.f64 b b) (pow.f64 (PI.f64) 2)))))))) (.f64 -2 (.f64 (/.f64 a y-scale) (/.f64 a y-scale))))))
(fma.f64 (.f64 angle angle) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))) (fma.f64 (-.f64 (fma.f64 4 (.f64 (/.f64 (fma.f64 1/32400 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (fma.f64 1/2040733440000000 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 (PI.f64) 6) 13/1224440064000000))) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 -2 (/.f64 (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (fma.f64 (.f64 b b) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (/.f64 (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (pow.f64 (PI.f64) 6) (.f64 -1/765275040000000 (.f64 b b)))) (/.f64 (.f64 y-scale y-scale) (.f64 a a)))))) (.f64 b b)))) (fma.f64 -2 (/.f64 (.f64 a a) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 b b)) (fma.f64 (.f64 a a) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000) (.f64 (pow.f64 (PI.f64) 6) (.f64 -1/765275040000000 (.f64 b b)))))) (+.f64 (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 b b) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 b b) -1/787320000))) (/.f64 (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (.f64 b b) (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))) (/.f64 (.f64 b b) -2))) (fma.f64 -2 (.f64 (/.f64 a (/.f64 (.f64 b b) a)) (/.f64 (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 y-scale y-scale))) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 b b) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))))))))) (/.f64 (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (/.f64 (.f64 b b) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b)))))))))) (pow.f64 angle 6) (fma.f64 (pow.f64 angle 4) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 b b) -1/787320000))) (/.f64 (fma.f64 (fma.f64 -1/3149280000 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 4)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (.f64 a a)) 1/3149280000))) (.f64 b b) (fma.f64 (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))))))) (/.f64 (.f64 b b) -2))) (fma.f64 -2 (.f64 (/.f64 a (/.f64 (.f64 b b) a)) (/.f64 (fma.f64 -1/3149280000 (.f64 a (.f64 a (pow.f64 (PI.f64) 4))) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000))) (.f64 y-scale y-scale))) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (/.f64 (.f64 b b) (+.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400)))) (.f64 (.f64 b b) (fma.f64 -1/32400 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (pow.f64 (PI.f64) 2)) (.f64 1/32400 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (PI.f64) 2)))))) (.f64 b b)) (.f64 1/8100 (.f64 (/.f64 (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 b b))))) (.f64 2 (.f64 (.f64 (/.f64 a y-scale) (/.f64 a y-scale)) (/.f64 (fma.f64 1/32400 (.f64 (.f64 a a) (pow.f64 (PI.f64) 2)) (.f64 (.f64 b b) (.f64 (pow.f64 (PI.f64) 2) -1/32400))) (.f64 b b))))))))) (.f64 (/.f64 a y-scale) (.f64 (/.f64 a y-scale) -2)))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 4 (.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) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a))))
(/.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 2)))
(/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b)))
(/.f64 (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))))) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 b b)))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 -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 4 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))))))
(fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)) -2))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (+.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 -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 4 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) 2) (.f64 (/.f64 (pow.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 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b b)))) (.f64 -2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)))))))
(fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (fma.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 (/.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) (.f64 b b))) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (*.f64 (/.f64 b y-scale) (/.f64 b y-scale)) -2)))))
(+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 (pow.f64 a 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (+.f64 (.f64 (pow.f64 a 4) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 b 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (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 b 4)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (+.f64 (.f64 -1 (/.f64 (.f64 (pow.f64 a 6) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2)))) (.f64 4 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 b 2))))) (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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))) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 b 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)))) (.f64 -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 4 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (pow.f64 a 4) (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) 2) (.f64 (/.f64 (pow.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 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 b b)))) (fma.f64 -1 (/.f64 (.f64 (.f64 (pow.f64 a 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (-.f64 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) 2) (.f64 (/.f64 (pow.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 -8 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4))) (.f64 y-scale y-scale)))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 4)) (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 b b))) (.f64 -2 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))))))))
(fma.f64 4 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale))) (fma.f64 (.f64 a a) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))) (fma.f64 (pow.f64 a 4) (-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 (/.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) (.f64 b b))) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))))) (fma.f64 -1 (/.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (pow.f64 a 6)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (-.f64 (/.f64 (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 2) (.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 (/.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) (.f64 b b))) (-.f64 (fma.f64 -8 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)))))) (/.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))) 4) (pow.f64 b 4)) (fma.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2))) (.f64 -2 (/.f64 (pow.f64 b 4) (/.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))))))))))) (.f64 b b)) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (*.f64 (/.f64 b y-scale) (/.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (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 y-scale y-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)))) 2) (*.f64 a a)))
(/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)) 2))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4)))))))) (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a))))))))) (+.f64 (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (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 a a)) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b))))))
(-.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 b 4))) 2) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.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)))) 2) (.f64 b b))))) (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (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 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4)))))))) (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -1 (.f64 (/.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 b 4))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)))) (.f64 (pow.f64 a 4) (pow.f64 (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 -2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a))))))))) (+.f64 (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (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 a a)) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)))))))
(/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (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 y-scale y-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)))) 2) (*.f64 a a)))
(/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)) 2))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))
(+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))))
(+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 2)))))
(-.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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4)))))))) (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a))))))))) (+.f64 (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (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 a a)) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b))))))
(-.f64 (+.f64 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 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 a 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 2)))) (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2)) (pow.f64 y-scale 2))) (+.f64 (.f64 -1 (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (pow.f64 y-scale 2)))) (/.f64 (.f64 (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (pow.f64 a 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 b 4)) (.f64 (pow.f64 y-scale 2) (pow.f64 a 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (/.f64 (.f64 (pow.f64 b 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 b 2)) (pow.f64 y-scale 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -8 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/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)))) 2) (pow.f64 b 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))))) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4))) (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))) (fma.f64 -1 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 b 4))) 2) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b))))) (/.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)))) 2) (.f64 b b))))) (/.f64 (.f64 (pow.f64 a 4) (pow.f64 (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 -2 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 a a)) (pow.f64 b 4)))))))) (+.f64 (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))) (.f64 (/.f64 (.f64 b b) (.f64 a a)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (fma.f64 -2 (/.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (/.f64 (.f64 y-scale y-scale) (.f64 b b)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 -8 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (.f64 b b))))) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b)))))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.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 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)) 2)) (-.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a)))) (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (fma.f64 -1 (.f64 (/.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 b 4))) (.f64 (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)))) (.f64 (pow.f64 a 4) (pow.f64 (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 -2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 b 4) (.f64 a a))))))))) (+.f64 (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (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 a a)) (/.f64 (-.f64 (fma.f64 -2 (/.f64 (+.f64 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4)) (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (.f64 -8 (.f64 (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)))) (/.f64 (.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 2 (.f64 b b))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4) (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))) (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(+.f64 (.f64 (.f64 -2 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) 1)
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 1 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 (sqrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (sqrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 (.f64 (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))))) (cbrt.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(pow.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))) 1)
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(log.f64 (exp.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(cbrt.f64 (.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))))
(cbrt.f64 (pow.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))) 3))
(cbrt.f64 (pow.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) 3))
(expm1.f64 (log1p.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(exp.f64 (log.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(log1p.f64 (expm1.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4)))
(.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (/.f64 1 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))) 1)
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 1 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 (sqrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (sqrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 (.f64 (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (cbrt.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(.f64 (/.f64 1 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (*.f64 y-scale y-scale)))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(pow.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 1)
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(log.f64 (exp.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(cbrt.f64 (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))
(cbrt.f64 (pow.f64 (/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 3))
(cbrt.f64 (pow.f64 (/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a)))) 3))
(expm1.f64 (log1p.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(exp.f64 (log.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))
(log1p.f64 (expm1.f64 (/.f64 (fma.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (+.f64 b a)) (-.f64 b a)) 2) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) 4) (.f64 y-scale y-scale)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))
(/.f64 (fma.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) 4)) (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (.f64 -2 (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (fma.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))
(/.f64 (fma.f64 -2 (.f64 (fma.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 b y-scale) (/.f64 b y-scale)) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 (/.f64 a y-scale) (/.f64 a y-scale)))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 a a)))) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (+.f64 a b) (-.f64 b a))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) 4))) (fma.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (*.f64 a a))))

eval4.0s (2.8%)

Compiler: Compiled 233670 to 137101 computations (41.3% saved)

prune858.0ms (0.6%)

Pruning

50 alts after pruning (49 fresh and 1 done)

	Pruned	Kept	Total
New	1474	42	1516
Fresh	9	7	16
Picked	1	0	1
Done	3	1	4
Total	1487	50	1537

Accurracy

54.5%

Counts

1537 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	6.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (/.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
	6.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
	7.5%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
▶	16.7%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
	6.7%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
	22.6%	(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
	9.9%	(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
	22.0%	(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
▶	26.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1))
	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
✓	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
	25.9%	(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
	22.6%	(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
	9.5%	(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
▶	22.1%	(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
	26.0%	(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 (.f64 a a) 16)))
	24.8%	(.f64 (.f64 1/4 x-scale) (log.f64 (pow.f64 (exp.f64 a) 4)))
	20.3%	(.f64 (.f64 1/4 x-scale) (expm1.f64 (log1p.f64 (*.f64 a 4))))
	9.6%	(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
	24.6%	(.f64 (.f64 1/4 x-scale) (cbrt.f64 (pow.f64 (*.f64 a 4) 3)))
	4.2%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
	15.6%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-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 1 (*.f64 y-scale y-scale)))))
▶	2.3%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
	15.4%	(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale a))))
	14.7%	(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (*.f64 (sqrt.f64 8) a) x-scale))))
	6.8%	(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))))) (.f64 -1/4 (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
	4.0%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 1 (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))
	3.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))))))
	4.4%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
	15.4%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))))
	13.1%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (/.f64 b (/.f64 (*.f64 x-scale x-scale) b)))))))
	6.1%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))))))
	15.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	2.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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)))))))))
	5.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
	5.8%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))))))
	3.6%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 2) (.f64 y-scale y-scale))) 2))))))))
	9.8%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
	11.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
	7.2%	(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)))))))))
	4.2%	(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 1 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
	1.8%	(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
	2.7%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
	5.5%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
	17.4%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
	7.2%	(.f64 1/4 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))))))))
	17.4%	(.f64 1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
	15.4%	(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
▶	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))

Compiler

Compiled 5480 to 3760 computations (31.4% saved)

localize24.0ms (0%)

Local Accuracy

Found 2 expressions with local accuracy:

New	Accuracy	Program
✓	97.2%	(exp.f64 (log1p.f64 (*.f64 a 4)))
✓	94.5%	(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)

Compiler

Compiled 43 to 34 computations (20.9% saved)

series60.0ms (0%)

Counts

2 → 24

Calls

6 calls:

Time	Variable		Point	Expression
45.0ms	a	@	0	(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)
10.0ms	a	@	-inf	(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)
4.0ms	a	@	inf	(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)
0.0ms	a	@	inf	(exp.f64 (log1p.f64 (*.f64 a 4)))
0.0ms	a	@	-inf	(exp.f64 (log1p.f64 (*.f64 a 4)))

rewrite111.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1628×	`add-sqr-sqrt`
1608×	`*-un-lft-identity`
1506×	`add-cube-cbrt`
1492×	`add-cbrt-cube`
168×	`add-exp-log`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	10	22
1	203	20
2	2095	20

Stop Event

1×	node limit

Counts

2 → 65

Calls

Call 1

Inputs
(-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1)
(exp.f64 (log1p.f64 (*.f64 a 4)))

Outputs

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

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

simplify89.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1190×	`fma-def`
818×	`associate--l-`
706×	`unswap-sqr`
692×	`times-frac`
688×	`associate--r-`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	163	2123
1	386	1645
2	1385	1519
3	7197	1519

Stop Event

1×	node limit

Counts

89 → 114

Calls

Call 1

Inputs
(*.f64 4 a)
(*.f64 4 a)
(*.f64 4 a)
(*.f64 4 a)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1)
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
1
(+.f64 (*.f64 4 a) 1)
(+.f64 (*.f64 4 a) 1)
(+.f64 (*.f64 4 a) 1)
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4)))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (+.f64 (*.f64 a 4) 1) -1)
(+.f64 -1 (+.f64 (*.f64 a 4) 1))
(*.f64 a 4)
(*.f64 4 a)
(.f64 (.f64 a 4) 1)
(.f64 1 (.f64 a 4))
(.f64 (.f64 2 (sqrt.f64 a)) (*.f64 2 (sqrt.f64 a)))
(.f64 (sqrt.f64 a) (.f64 (sqrt.f64 a) 4))
(.f64 (cbrt.f64 (.f64 a 4)) (pow.f64 (cbrt.f64 (*.f64 a 4)) 2))
(.f64 (pow.f64 (cbrt.f64 (.f64 a 4)) 2) (cbrt.f64 (*.f64 a 4)))
(.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4))
(.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1)))
(.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (.f64 a 4) 1) 1))))
(.f64 (.f64 4 (sqrt.f64 a)) (sqrt.f64 a))
(.f64 (.f64 4 (pow.f64 (cbrt.f64 a) 2)) (cbrt.f64 a))
(.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 a 4) 1)) 1))
(/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1)))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (.f64 a 4) 1) 1)) (+.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3) -1)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (+.f64 (+.f64 (.f64 a 4) 1) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (-.f64 (+.f64 (.f64 a 4) 1) -1))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (*.f64 a 4) 1) 1)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (-.f64 1 (.f64 (+.f64 (.f64 a 4) 1) -1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1)) (neg.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1)) (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
(pow.f64 (*.f64 a 4) 1)
(pow.f64 (*.f64 2 (sqrt.f64 a)) 2)
(pow.f64 (cbrt.f64 (*.f64 a 4)) 3)
(pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3)
(sqrt.f64 (.f64 16 (.f64 a a)))
(log.f64 (pow.f64 (exp.f64 a) 4))
(log.f64 (+.f64 1 (expm1.f64 (*.f64 a 4))))
(cbrt.f64 (pow.f64 (*.f64 a 4) 3))
(expm1.f64 (log1p.f64 (*.f64 a 4)))
(exp.f64 (log.f64 (*.f64 a 4)))
(exp.f64 (.f64 (log.f64 (.f64 a 4)) 1))
(log1p.f64 (expm1.f64 (*.f64 a 4)))
(fma.f64 1 (+.f64 (*.f64 a 4) 1) -1)
(fma.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (sqrt.f64 (+.f64 (.f64 a 4) 1)) -1)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (cbrt.f64 (+.f64 (.f64 a 4) 1)) -1)
(+.f64 (*.f64 a 4) 1)
(+.f64 1 (*.f64 a 4))
(+.f64 (+.f64 (+.f64 (*.f64 a 4) 1) 1) -1)
(-.f64 (+.f64 (+.f64 (*.f64 a 4) 1) 1) 1)
(.f64 (+.f64 (.f64 a 4) 1) 1)
(.f64 1 (+.f64 (.f64 a 4) 1))
(.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (sqrt.f64 (+.f64 (*.f64 a 4) 1)))
(.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) 1))
(.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 a 4) 1)) 2))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (cbrt.f64 (+.f64 (*.f64 a 4) 1)))
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 1))
(/.f64 (-.f64 1 (.f64 16 (.f64 a a))) (-.f64 1 (*.f64 a 4)))
(/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4))))
(pow.f64 (+.f64 (*.f64 a 4) 1) 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 a 4) 1)) 2)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 a 4) 1)) 3)
(pow.f64 (E.f64) (log1p.f64 (*.f64 a 4)))
(pow.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3) 1/3)
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 a 4)))) (sqrt.f64 (log1p.f64 (.f64 a 4))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 a 4))) 2)) (cbrt.f64 (log1p.f64 (.f64 a 4))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 2))
(log.f64 (exp.f64 (+.f64 (*.f64 a 4) 1)))
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 a 4) 1))))
(cbrt.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3))
(expm1.f64 (log1p.f64 (+.f64 (*.f64 a 4) 1)))
(log1p.f64 (expm1.f64 (+.f64 (*.f64 a 4) 1)))

Outputs
(*.f64 4 a)
(*.f64 4 a)
(*.f64 4 a)
(*.f64 4 a)
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1)
(expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4)))
(+.f64 -1 (*.f64 4 a))
(fma.f64 4 a -1)
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(+.f64 (/.f64 (*.f64 1/4 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4)))) a) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(+.f64 -1 (fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a)))
(fma.f64 4 a (fma.f64 1/4 (*.f64 4 (/.f64 a a)) -1))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(+.f64 (/.f64 (*.f64 1/4 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4)))) a) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(+.f64 -1 (fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a)))
(fma.f64 4 a (fma.f64 1/4 (*.f64 4 (/.f64 a a)) -1))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))) 1)
(+.f64 (/.f64 (*.f64 1/4 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4)))) a) (expm1.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(+.f64 -1 (fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a)))
(fma.f64 4 a (fma.f64 1/4 (*.f64 4 (/.f64 a a)) -1))
(-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) 1)
(expm1.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4)))
(fma.f64 (pow.f64 (/.f64 -1 a) -1) -4 -1)
(+.f64 -1 (/.f64 -4 (/.f64 -1 a)))
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (-.f64 (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)) 1))
(fma.f64 (pow.f64 (/.f64 -1 a) -1) -4 (fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) -1))
(+.f64 -1 (fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a))))
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (-.f64 (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)) 1))
(fma.f64 (pow.f64 (/.f64 -1 a) -1) -4 (fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) -1))
(+.f64 -1 (fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a))))
(-.f64 (+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a))) 1)
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (-.f64 (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)) 1))
(fma.f64 (pow.f64 (/.f64 -1 a) -1) -4 (fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) -1))
(+.f64 -1 (fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a))))
1
(+.f64 (*.f64 4 a) 1)
(fma.f64 4 a 1)
(+.f64 (*.f64 4 a) 1)
(fma.f64 4 a 1)
(+.f64 (*.f64 4 a) 1)
(fma.f64 4 a 1)
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4)))
(*.f64 4 a)
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))) a) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a))
(fma.f64 1/4 (.f64 4 (/.f64 a a)) (.f64 4 a))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))) a) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a))
(fma.f64 1/4 (.f64 4 (/.f64 a a)) (.f64 4 a))
(+.f64 (.f64 1/4 (/.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) a)) (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))))
(fma.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))) a) (exp.f64 (fma.f64 -1 (neg.f64 (log.f64 a)) (log.f64 4))))
(fma.f64 1/4 (/.f64 (.f64 4 a) a) (.f64 4 a))
(fma.f64 1/4 (.f64 4 (/.f64 a a)) (.f64 4 a))
(exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4)))
(exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4)))
(*.f64 (pow.f64 (/.f64 -1 a) -1) -4)
(/.f64 -4 (/.f64 -1 a))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)))
(fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) (*.f64 (pow.f64 (/.f64 -1 a) -1) -4))
(fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a)))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)))
(fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) (*.f64 (pow.f64 (/.f64 -1 a) -1) -4))
(fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a)))
(+.f64 (exp.f64 (+.f64 (.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) (.f64 1/4 (/.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 -1 a))) (log.f64 -4))) a)))
(+.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) (*.f64 1/4 (/.f64 (exp.f64 (fma.f64 -1 (log.f64 (/.f64 -1 a)) (log.f64 -4))) a)))
(fma.f64 1/4 (/.f64 (pow.f64 (/.f64 -1 a) -1) (/.f64 a -4)) (*.f64 (pow.f64 (/.f64 -1 a) -1) -4))
(fma.f64 1/4 (/.f64 (/.f64 -4 (/.f64 -1 a)) a) (/.f64 -4 (/.f64 -1 a)))
(+.f64 (+.f64 (*.f64 a 4) 1) -1)
(*.f64 4 a)
(+.f64 -1 (+.f64 (*.f64 a 4) 1))
(*.f64 4 a)
(*.f64 a 4)
(*.f64 4 a)
(*.f64 4 a)
(.f64 (.f64 a 4) 1)
(*.f64 4 a)
(.f64 1 (.f64 a 4))
(*.f64 4 a)
(.f64 (.f64 2 (sqrt.f64 a)) (*.f64 2 (sqrt.f64 a)))
(*.f64 4 a)
(.f64 (sqrt.f64 a) (.f64 (sqrt.f64 a) 4))
(*.f64 4 a)
(.f64 (cbrt.f64 (.f64 a 4)) (pow.f64 (cbrt.f64 (*.f64 a 4)) 2))
(*.f64 4 a)
(.f64 (pow.f64 (cbrt.f64 (.f64 a 4)) 2) (cbrt.f64 (*.f64 a 4)))
(*.f64 4 a)
(.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4))
(*.f64 4 a)
(.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1)))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) 1) (+.f64 (.f64 4 a) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) (fma.f64 4 a 2))
(/.f64 (fma.f64 4 a 2) (/.f64 (fma.f64 4 a 2) (*.f64 4 a)))
(.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (/.f64 1 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (.f64 a 4) 1) 1))))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (+.f64 (.f64 4 a) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (fma.f64 4 a 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (fma.f64 (fma.f64 4 a 1) (fma.f64 4 a 2) 1))
(.f64 (.f64 4 (sqrt.f64 a)) (sqrt.f64 a))
(*.f64 4 a)
(.f64 (.f64 4 (pow.f64 (cbrt.f64 a) 2)) (cbrt.f64 a))
(*.f64 4 a)
(.f64 (+.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) 1) (-.f64 (sqrt.f64 (+.f64 (*.f64 a 4) 1)) 1))
(*.f64 4 a)
(/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1)))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) 1) (+.f64 (.f64 4 a) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) (fma.f64 4 a 2))
(/.f64 (fma.f64 4 a 2) (/.f64 (fma.f64 4 a 2) (*.f64 4 a)))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (.f64 a 4) 1) 1)) (+.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3) -1)))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (+.f64 (.f64 4 a) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (fma.f64 4 a 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (fma.f64 (fma.f64 4 a 1) (fma.f64 4 a 2) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (+.f64 (+.f64 (.f64 a 4) 1) 1))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) 1) (+.f64 (.f64 4 a) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) (fma.f64 4 a 2))
(/.f64 (fma.f64 4 a 2) (/.f64 (fma.f64 4 a 2) (*.f64 4 a)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (-.f64 (+.f64 (.f64 a 4) 1) -1))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) 1) (+.f64 (.f64 4 a) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) (fma.f64 4 a 2))
(/.f64 (fma.f64 4 a 2) (/.f64 (fma.f64 4 a 2) (*.f64 4 a)))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (*.f64 a 4) 1) 1)))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (+.f64 (.f64 4 a) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (fma.f64 4 a 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (fma.f64 (fma.f64 4 a 1) (fma.f64 4 a 2) 1))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (-.f64 1 (.f64 (+.f64 (.f64 a 4) 1) -1))))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (+.f64 (.f64 4 a) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (fma.f64 4 a 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (fma.f64 (fma.f64 4 a 1) (fma.f64 4 a 2) 1))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1)) (neg.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1)))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) 1) (+.f64 (.f64 4 a) 2))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 2)) (fma.f64 4 a 2))
(/.f64 (fma.f64 4 a 2) (/.f64 (fma.f64 4 a 2) (*.f64 4 a)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 3) -1)) (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
(/.f64 (.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) 1) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (+.f64 (.f64 4 a) 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (+.f64 (pow.f64 (fma.f64 4 a 1) 2) (fma.f64 4 a 2)))
(/.f64 (+.f64 -1 (pow.f64 (fma.f64 4 a 1) 3)) (fma.f64 (fma.f64 4 a 1) (fma.f64 4 a 2) 1))
(pow.f64 (*.f64 a 4) 1)
(*.f64 4 a)
(pow.f64 (*.f64 2 (sqrt.f64 a)) 2)
(*.f64 4 a)
(pow.f64 (cbrt.f64 (*.f64 a 4)) 3)
(*.f64 4 a)
(pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3)
(*.f64 4 a)
(sqrt.f64 (.f64 16 (.f64 a a)))
(sqrt.f64 (.f64 a (.f64 a 16)))
(fabs.f64 (*.f64 4 a))
(log.f64 (pow.f64 (exp.f64 a) 4))
(*.f64 4 a)
(log.f64 (+.f64 1 (expm1.f64 (*.f64 a 4))))
(*.f64 4 a)
(cbrt.f64 (pow.f64 (*.f64 a 4) 3))
(*.f64 4 a)
(expm1.f64 (log1p.f64 (*.f64 a 4)))
(*.f64 4 a)
(exp.f64 (log.f64 (*.f64 a 4)))
(*.f64 4 a)
(exp.f64 (.f64 (log.f64 (.f64 a 4)) 1))
(*.f64 4 a)
(log1p.f64 (expm1.f64 (*.f64 a 4)))
(*.f64 4 a)
(fma.f64 1 (+.f64 (*.f64 a 4) 1) -1)
(*.f64 4 a)
(fma.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (sqrt.f64 (+.f64 (.f64 a 4) 1)) -1)
(*.f64 4 a)
(fma.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (cbrt.f64 (+.f64 (.f64 a 4) 1)) -1)
(*.f64 4 a)
(+.f64 (*.f64 a 4) 1)
(fma.f64 4 a 1)
(+.f64 1 (*.f64 a 4))
(fma.f64 4 a 1)
(+.f64 (+.f64 (+.f64 (*.f64 a 4) 1) 1) -1)
(fma.f64 4 a 1)
(-.f64 (+.f64 (+.f64 (*.f64 a 4) 1) 1) 1)
(fma.f64 4 a 1)
(.f64 (+.f64 (.f64 a 4) 1) 1)
(fma.f64 4 a 1)
(.f64 1 (+.f64 (.f64 a 4) 1))
(fma.f64 4 a 1)
(.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (sqrt.f64 (+.f64 (*.f64 a 4) 1)))
(fma.f64 4 a 1)
(.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) (.f64 (sqrt.f64 (+.f64 (.f64 a 4) 1)) 1))
(fma.f64 4 a 1)
(.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) (pow.f64 (cbrt.f64 (+.f64 (*.f64 a 4) 1)) 2))
(fma.f64 4 a 1)
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (cbrt.f64 (+.f64 (*.f64 a 4) 1)))
(fma.f64 4 a 1)
(.f64 (pow.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 2) (.f64 (cbrt.f64 (+.f64 (.f64 a 4) 1)) 1))
(fma.f64 4 a 1)
(/.f64 (-.f64 1 (.f64 16 (.f64 a a))) (-.f64 1 (*.f64 a 4)))
(/.f64 (+.f64 1 (.f64 -16 (.f64 a a))) (-.f64 1 (*.f64 4 a)))
(/.f64 (+.f64 1 (.f64 (.f64 a a) -16)) (+.f64 1 (*.f64 a -4)))
(/.f64 (fma.f64 (*.f64 a a) -16 1) (fma.f64 a -4 1))
(/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4))))
(/.f64 (+.f64 1 (.f64 (pow.f64 a 3) 64)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 4 a))))
(/.f64 (fma.f64 (pow.f64 a 3) 64 1) (+.f64 1 (.f64 a (-.f64 (.f64 a 16) 4))))
(/.f64 (fma.f64 (pow.f64 a 3) 64 1) (fma.f64 a (fma.f64 a 16 -4) 1))
(pow.f64 (+.f64 (*.f64 a 4) 1) 1)
(fma.f64 4 a 1)
(pow.f64 (sqrt.f64 (+.f64 (*.f64 a 4) 1)) 2)
(fma.f64 4 a 1)
(pow.f64 (cbrt.f64 (+.f64 (*.f64 a 4) 1)) 3)
(fma.f64 4 a 1)
(pow.f64 (E.f64) (log1p.f64 (*.f64 a 4)))
(pow.f64 (E.f64) (log1p.f64 (*.f64 4 a)))
(pow.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3) 1/3)
(fma.f64 4 a 1)
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 a 4)))) (sqrt.f64 (log1p.f64 (.f64 a 4))))
(pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 4 a)))) (sqrt.f64 (log1p.f64 (.f64 4 a))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 a 4))) 2)) (cbrt.f64 (log1p.f64 (.f64 a 4))))
(pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 4 a))) 2)) (cbrt.f64 (log1p.f64 (.f64 4 a))))
(sqrt.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 2))
(fma.f64 4 a 1)
(log.f64 (exp.f64 (+.f64 (*.f64 a 4) 1)))
(fma.f64 4 a 1)
(log.f64 (+.f64 1 (expm1.f64 (+.f64 (*.f64 a 4) 1))))
(fma.f64 4 a 1)
(cbrt.f64 (pow.f64 (+.f64 (*.f64 a 4) 1) 3))
(fma.f64 4 a 1)
(expm1.f64 (log1p.f64 (+.f64 (*.f64 a 4) 1)))
(fma.f64 4 a 1)
(log1p.f64 (expm1.f64 (+.f64 (*.f64 a 4) 1)))
(fma.f64 4 a 1)

localize21.0ms (0%)

Compiler: Compiled 22 to 16 computations (27.3% saved)

localize33.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.5%	(.f64 1/180 (.f64 angle (PI.f64)))
✓	99.4%	(.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))
✓	96.3%	(.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))
	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 75 to 46 computations (38.7% saved)

series13.0ms (0%)

Counts

3 → 60

Calls

18 calls:

Time	Variable		Point	Expression
6.0ms	x-scale	@	0	(.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))
1.0ms	angle	@	0	(.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))
1.0ms	b	@	0	(.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))
1.0ms	angle	@	inf	(.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))
1.0ms	b	@	0	(.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))

rewrite104.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1360×	`unswap-sqr`
1126×	`swap-sqr`
604×	`sqr-pow`
348×	`distribute-rgt-in`
340×	`add-sqr-sqrt`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	91
1	339	91
2	3976	91

Stop Event

1×	node limit

Counts

3 → 43

Calls

Call 1

Inputs

(*.f64 x-scale (*.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8)))

(*.f64 (*.f64 b (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64))))) (sqrt.f64 8))

(*.f64 1/180 (*.f64 angle (PI.f64)))

Outputs

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

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

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

simplify112.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1516×	`associate-*r/`
1386×	`associate-*l/`
1328×	`unswap-sqr`
934×	`+-commutative`
886×	`fma-def`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	163	4189
1	424	4189
2	1704	4125
3	6303	4125

Stop Event

1×	node limit

Counts

103 → 92

Calls

Call 1

Inputs
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))))) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(-.f64 (exp.f64 (log1p.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))))) 1)
(pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 1)
(pow.f64 (sqrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))) 2)
(pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))) 3)
(pow.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 2))
(log.f64 (pow.f64 (exp.f64 x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))))))
(cbrt.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(expm1.f64 (log1p.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(exp.f64 (log.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(exp.f64 (.f64 (log.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 1))
(log1p.f64 (expm1.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 1)
(pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 1)
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 2)
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3))
(cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))
(cbrt.f64 (.f64 (.f64 8 (sqrt.f64 8)) (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 3)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 1))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)
(pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 1)
(pow.f64 (sqrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)
(pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3)
(pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) angle) 1/180))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3))
(expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))
(exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))
(exp.f64 (.f64 (log.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)) 1))
(log1p.f64 (expm1.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))

Outputs
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))
(.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (*.f64 1/180 angle)))
(.f64 x-scale (.f64 1/180 (.f64 b (.f64 (*.f64 (PI.f64) (sqrt.f64 8)) angle))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 -1/34992000 (.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8))) (.f64 x-scale (pow.f64 angle 3))) (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (*.f64 1/180 angle))))
(.f64 x-scale (fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))))
(fma.f64 -1/34992000 (.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8))) (.f64 x-scale (pow.f64 angle 3))) (fma.f64 1/180 (.f64 angle (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) x-scale)) (.f64 x-scale (.f64 1/22674816000000 (.f64 (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)) (*.f64 b (pow.f64 angle 5)))))))
(fma.f64 x-scale (.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3))) (.f64 x-scale (.f64 b (+.f64 (.f64 (.f64 1/180 angle) (.f64 (PI.f64) (sqrt.f64 8))) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (fma.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))))
(fma.f64 -1/34992000 (.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8))) (.f64 x-scale (pow.f64 angle 3))) (fma.f64 -1/30855889612800000000 (.f64 (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 7) b)) (.f64 x-scale (pow.f64 angle 7))) (fma.f64 1/180 (.f64 angle (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) x-scale)) (.f64 x-scale (.f64 1/22674816000000 (.f64 (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)) (*.f64 b (pow.f64 angle 5))))))))
(+.f64 (.f64 x-scale (fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (.f64 (pow.f64 angle 5) (.f64 (.f64 (pow.f64 (PI.f64) 5) (.f64 b (sqrt.f64 8))) 1/22674816000000)))) (.f64 x-scale (.f64 b (+.f64 (.f64 (.f64 1/180 angle) (.f64 (PI.f64) (sqrt.f64 8))) (.f64 (.f64 -1/30855889612800000000 (pow.f64 angle 7)) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))))
(+.f64 (.f64 x-scale (fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (.f64 (pow.f64 angle 5) (.f64 (.f64 (pow.f64 (PI.f64) 5) (.f64 b (sqrt.f64 8))) 1/22674816000000)))) (.f64 x-scale (.f64 b (+.f64 (.f64 (.f64 -1/30855889612800000000 (pow.f64 angle 7)) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))) (.f64 (.f64 1/180 angle) (.f64 (PI.f64) (sqrt.f64 8)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8)))))
(.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))
(.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (.f64 1/180 (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))
(fma.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)) (.f64 (pow.f64 angle 3) (.f64 (.f64 (pow.f64 (PI.f64) 3) (*.f64 b (sqrt.f64 8))) -1/34992000)))
(fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (.f64 1/180 (.f64 b (.f64 (*.f64 (PI.f64) (sqrt.f64 8)) angle))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8)))) (fma.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)) (.f64 1/22674816000000 (.f64 (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)) (.f64 b (pow.f64 angle 5))))))
(fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (.f64 b (+.f64 (.f64 (.f64 1/180 angle) (.f64 (PI.f64) (sqrt.f64 8))) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))))
(+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))))) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))))
(fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))) (fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))))
(fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (sqrt.f64 8) (.f64 (pow.f64 (PI.f64) 7) b))) (fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8)))) (fma.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)) (.f64 1/22674816000000 (.f64 (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)) (*.f64 b (pow.f64 angle 5)))))))
(fma.f64 -1/34992000 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (.f64 angle (PI.f64)) 3)) (fma.f64 -1/30855889612800000000 (.f64 (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)) (.f64 b (pow.f64 angle 7))) (.f64 b (+.f64 (.f64 (.f64 1/180 angle) (.f64 (PI.f64) (sqrt.f64 8))) (.f64 (.f64 1/22674816000000 (pow.f64 angle 5)) (*.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))))) 1)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 1)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (sqrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))) 2)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))) 3)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(pow.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3) 1/3)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(sqrt.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 2))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(log.f64 (pow.f64 (exp.f64 x-scale) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(cbrt.f64 (pow.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))) 3)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(expm1.f64 (log1p.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (log.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(exp.f64 (.f64 (log.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 1))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(log1p.f64 (expm1.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (*.f64 b (sqrt.f64 8))))
(.f64 x-scale (.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 1)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 1)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 2)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) 2)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(cbrt.f64 (.f64 (.f64 8 (sqrt.f64 8)) (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 3)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 1))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))
(.f64 (sqrt.f64 8) (.f64 b (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 1)
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 1)
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(pow.f64 (sqrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3)
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3)
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(sqrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 2))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (PI.f64)) angle) 1/180))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(exp.f64 (.f64 (log.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)) 1))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))
(log1p.f64 (expm1.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))
(.f64 angle (.f64 1/180 (PI.f64)))
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (PI.f64) (.f64 1/180 angle))

localize72.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	92.4%	(/.f64 a (*.f64 y-scale (/.f64 y-scale a)))
✓	78.4%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
✓	71.1%	(sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a)))))
✓	58.9%	(cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))

Compiler

Compiled 189 to 88 computations (53.4% saved)

series89.0ms (0.1%)

Counts

4 → 120

Calls

30 calls:

Time	Variable		Expression
66.0ms	a	@	(sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a)))))
2.0ms	angle	@	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
1.0ms	angle	@	(sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a)))))
1.0ms	x-scale	@	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
1.0ms	y-scale	@	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))

rewrite158.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

578×	`add-sqr-sqrt`
564×	`*-un-lft-identity`
562×	`pow1`
536×	`add-exp-log`
536×	`add-cbrt-cube`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	28	212
1	590	146
2	7583	146

Stop Event

1×	node limit

Counts

4 → 103

Calls

Call 1

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

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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (pow.f64 (cbrt.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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (pow.f64 (cbrt.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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (cos.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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((fabs.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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 1 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2)) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (pow.f64 1 1/2) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (pow.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2) 1/2) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((/.f64 (sqrt.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((/.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 3) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))) (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((fabs.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (exp.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (.f64 (log.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log1p.f64 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (sqrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (cbrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale))))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((sqrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (exp.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((cbrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) 3) (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3) (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((expm1.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log1p.f64 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a)))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 a (/.f64 (/.f64 a y-scale) y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 1 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (sqrt.f64 a) (.f64 (sqrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2) (cbrt.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (cbrt.f64 (.f64 a a)) (.f64 (cbrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 a y-scale) (/.f64 a y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (/.f64 a y-scale) y-scale) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (neg.f64 a) (/.f64 1 (.f64 y-scale (neg.f64 (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (/.f64 a y-scale) 1) (/.f64 a y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 1 y-scale) (/.f64 a (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 1 (/.f64 y-scale (sqrt.f64 a))) (/.f64 a (/.f64 y-scale (sqrt.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 a (cbrt.f64 (.f64 y-scale (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 a (.f64 y-scale y-scale)) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (/.f64 a y-scale) (neg.f64 y-scale)) (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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (sqrt.f64 a) y-scale) (/.f64 (sqrt.f64 a) (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (sqrt.f64 a) (/.f64 y-scale a)) (/.f64 (sqrt.f64 a) y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (sqrt.f64 a) 1) (/.f64 (sqrt.f64 a) (.f64 y-scale (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (sqrt.f64 a) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 (sqrt.f64 a) (cbrt.f64 (.f64 y-scale (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 a a)) y-scale) (/.f64 (cbrt.f64 a) (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale a)) (/.f64 (cbrt.f64 a) y-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 a a)) 1) (/.f64 (cbrt.f64 a) (.f64 y-scale (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale (sqrt.f64 a))) (/.f64 (cbrt.f64 a) (/.f64 y-scale (sqrt.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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((.f64 (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (cbrt.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (/.f64 y-scale a) 2) -1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((pow.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((neg.f64 (/.f64 a (.f64 y-scale (neg.f64 (/.f64 y-scale 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((sqrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (exp.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 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))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (log.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((exp.f64 (.f64 (log.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (/.f64 a 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>) ((cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))) 1/4)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))) #f)))

simplify171.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1406×	`distribute-rgt-in`
1402×	`distribute-lft-in`
850×	`associate-r`
800×	`associate-/r/`
692×	`associate-l`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	385	12367
1	1003	11655
2	4645	11643

Stop Event

1×	node limit

Counts

223 → 226

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 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(/.f64 (*.f64 (sqrt.f64 2) a) y-scale)
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (*.f64 (sqrt.f64 2) y-scale))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (+.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (.f64 (sqrt.f64 2) y-scale))) (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))) (*.f64 (sqrt.f64 2) a)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (+.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (.f64 (sqrt.f64 2) y-scale))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 6) (-.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/64800 (/.f64 (.f64 (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 y-scale (sqrt.f64 2)))) 2)) (pow.f64 (PI.f64) 2)) (pow.f64 (sqrt.f64 2) 2)))))) (.f64 (sqrt.f64 2) a))) (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))) (.f64 (sqrt.f64 2) a))))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (.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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))))
(+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (*.f64 a (sqrt.f64 8))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (*.f64 a (sqrt.f64 8)))))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 6) (.f64 (-.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/64800 (/.f64 (.f64 (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 y-scale (sqrt.f64 2)))) 2)) (pow.f64 (PI.f64) 2)) (pow.f64 (sqrt.f64 2) 2)))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8))))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 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 (pow.f64 (cbrt.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 1/180 angle)))) (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 1)
(pow.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(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))
(fabs.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))))
(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 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1)
(.f64 1 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2)) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (pow.f64 1 1/2) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2) 1/2) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 1/2))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 3) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))) (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2))))))
(pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2) 1/2)
(pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1)
(pow.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 2)
(pow.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 3)
(pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3) 1/3)
(fabs.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(log.f64 (exp.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(log.f64 (+.f64 1 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3))
(expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)))
(exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(exp.f64 (.f64 (log.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 1/2))
(exp.f64 (.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 1))
(log1p.f64 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))) 1)
(pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 1)
(pow.f64 (sqrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))) 2)
(pow.f64 (cbrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))) 3)
(pow.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 2))
(log.f64 (exp.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(cbrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 3))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) 3) (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3) (pow.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) 3)))
(expm1.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(exp.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(exp.f64 (.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale))))) 1))
(log1p.f64 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 a y-scale) 2))) 1)
(*.f64 a (/.f64 (/.f64 a y-scale) y-scale))
(*.f64 (pow.f64 (/.f64 a y-scale) 2) 1)
(*.f64 1 (pow.f64 (/.f64 a y-scale) 2))
(.f64 (sqrt.f64 a) (.f64 (sqrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale)))
(*.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2) (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)))
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (cbrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(*.f64 (/.f64 (/.f64 a y-scale) y-scale) a)
(.f64 (neg.f64 a) (/.f64 1 (.f64 y-scale (neg.f64 (/.f64 y-scale a)))))
(*.f64 (/.f64 (/.f64 a y-scale) 1) (/.f64 a y-scale))
(*.f64 (/.f64 1 y-scale) (/.f64 a (/.f64 y-scale a)))
(*.f64 (/.f64 1 (/.f64 y-scale (sqrt.f64 a))) (/.f64 a (/.f64 y-scale (sqrt.f64 a))))
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 a (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(.f64 (/.f64 a (.f64 y-scale y-scale)) a)
(*.f64 (/.f64 (/.f64 a y-scale) (neg.f64 y-scale)) (neg.f64 a))
(*.f64 (/.f64 (sqrt.f64 a) y-scale) (/.f64 (sqrt.f64 a) (/.f64 y-scale a)))
(*.f64 (/.f64 (sqrt.f64 a) (/.f64 y-scale a)) (/.f64 (sqrt.f64 a) y-scale))
(.f64 (/.f64 (sqrt.f64 a) 1) (/.f64 (sqrt.f64 a) (.f64 y-scale (/.f64 y-scale a))))
(.f64 (/.f64 (sqrt.f64 a) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 (sqrt.f64 a) (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) y-scale) (/.f64 (cbrt.f64 a) (/.f64 y-scale a)))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale a)) (/.f64 (cbrt.f64 a) y-scale))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) 1) (/.f64 (cbrt.f64 a) (*.f64 y-scale (/.f64 y-scale a))))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale (sqrt.f64 a))) (/.f64 (cbrt.f64 a) (/.f64 y-scale (sqrt.f64 a))))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 (*.f64 y-scale (/.f64 y-scale a)) 2))) (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (pow.f64 (/.f64 a y-scale) 2) 1)
(pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 3)
(pow.f64 (pow.f64 (/.f64 y-scale a) 2) -1)
(pow.f64 (/.f64 a y-scale) 2)
(pow.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3) 1/3)
(neg.f64 (/.f64 a (*.f64 y-scale (neg.f64 (/.f64 y-scale a)))))
(sqrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))
(log.f64 (exp.f64 (pow.f64 (/.f64 a y-scale) 2)))
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 a y-scale) 2))))
(cbrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))
(expm1.f64 (log1p.f64 (pow.f64 (/.f64 a y-scale) 2)))
(exp.f64 (log.f64 (pow.f64 (/.f64 a y-scale) 2)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 a y-scale) 2)) 1))
(log1p.f64 (expm1.f64 (pow.f64 (/.f64 a y-scale) 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 angle (.f64 angle (pow.f64 (PI.f64) 2))) 1)
(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 (.f64 -1/64800 angle) angle))))
(+.f64 1 (fma.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)) (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)))))
(+.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 -1/64800 angle) angle))) (fma.f64 -1/24488801280000000 (*.f64 (pow.f64 angle 6) (pow.f64 (PI.f64) 6)) 1))
(+.f64 (fma.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)) (.f64 1/25194240000 (.f64 (pow.f64 angle 4) (pow.f64 (PI.f64) 4)))) (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 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 (neg.f64 a) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 (neg.f64 a) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 (neg.f64 a) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 -1 (.f64 a (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 1 (pow.f64 y-scale 2))))))
(.f64 (neg.f64 a) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale)))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 a (neg.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (*.f64 y-scale y-scale))))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale)
(/.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) y-scale)
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a)))) y-scale)
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a)))) y-scale)
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a)))) y-scale)
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a)))) y-scale)
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a)))) y-scale)
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a)))) y-scale)
(.f64 -1 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(neg.f64 (.f64 (/.f64 1 y-scale) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a)))) y-scale)
(/.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a)))) y-scale)
(/.f64 (*.f64 (sqrt.f64 2) a) y-scale)
(/.f64 (sqrt.f64 2) (/.f64 y-scale a))
(*.f64 (/.f64 (sqrt.f64 2) y-scale) a)
(*.f64 (/.f64 a y-scale) (sqrt.f64 2))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (*.f64 (sqrt.f64 2) y-scale))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale a)) (.f64 -1/64800 (.f64 (/.f64 (.f64 angle angle) (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) y-scale))))
(fma.f64 -1/64800 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 y-scale a)) (/.f64 angle (/.f64 (sqrt.f64 2) angle))) (.f64 (/.f64 (sqrt.f64 2) y-scale) a))
(fma.f64 -1/64800 (.f64 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2))) (.f64 angle angle)) (.f64 (/.f64 a y-scale) (sqrt.f64 2)))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (+.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (.f64 (sqrt.f64 2) y-scale))) (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))) (*.f64 (sqrt.f64 2) a)))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale a)) (fma.f64 -1/64800 (.f64 (/.f64 (.f64 angle angle) (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) y-scale)) (.f64 1/2 (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 4)) (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2))) (*.f64 a (sqrt.f64 2))))))
(+.f64 (fma.f64 -1/64800 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 y-scale a)) (/.f64 angle (/.f64 (sqrt.f64 2) angle))) (.f64 (/.f64 (sqrt.f64 2) y-scale) a)) (.f64 (.f64 1/2 (/.f64 y-scale (sqrt.f64 2))) (/.f64 (pow.f64 angle 4) (/.f64 a (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 y-scale (sqrt.f64 2)) a))) 2))))))
(+.f64 (.f64 (/.f64 a y-scale) (sqrt.f64 2)) (fma.f64 -1/64800 (.f64 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2))) (.f64 angle angle)) (.f64 (/.f64 (.f64 1/2 y-scale) (/.f64 (.f64 a (sqrt.f64 2)) (pow.f64 angle 4))) (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (*.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2)))))
(+.f64 (/.f64 (.f64 (sqrt.f64 2) a) y-scale) (+.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 angle 2) (.f64 a (pow.f64 (PI.f64) 2))) (.f64 (sqrt.f64 2) y-scale))) (+.f64 (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 6) (-.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/64800 (/.f64 (.f64 (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 y-scale (sqrt.f64 2)))) 2)) (pow.f64 (PI.f64) 2)) (pow.f64 (sqrt.f64 2) 2)))))) (.f64 (sqrt.f64 2) a))) (.f64 1/2 (/.f64 (.f64 y-scale (.f64 (pow.f64 angle 4) (-.f64 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 a 2)) (pow.f64 y-scale 2)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))) (.f64 (sqrt.f64 2) a))))))
(+.f64 (/.f64 (sqrt.f64 2) (/.f64 y-scale a)) (fma.f64 -1/64800 (.f64 (/.f64 (.f64 angle angle) (sqrt.f64 2)) (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) y-scale)) (.f64 1/2 (+.f64 (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 6)) (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (.f64 1/64800 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2)) (/.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (PI.f64) 2)))))) (.f64 a (sqrt.f64 2))) (/.f64 (.f64 (.f64 y-scale (pow.f64 angle 4)) (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2))) (.f64 a (sqrt.f64 2)))))))
(+.f64 (fma.f64 -1/64800 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 y-scale a)) (/.f64 angle (/.f64 (sqrt.f64 2) angle))) (.f64 (/.f64 (sqrt.f64 2) y-scale) a)) (.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (+.f64 (/.f64 (+.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (/.f64 (.f64 1/64800 (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 y-scale (sqrt.f64 2)) a))) 2))) (/.f64 2 (pow.f64 (PI.f64) 2)))) (/.f64 a (pow.f64 angle 6))) (/.f64 (pow.f64 angle 4) (/.f64 a (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (*.f64 y-scale (sqrt.f64 2)) a))) 2))))))))
(+.f64 (.f64 (/.f64 a y-scale) (sqrt.f64 2)) (fma.f64 -1/64800 (.f64 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2))) (.f64 angle angle)) (.f64 1/2 (.f64 (/.f64 y-scale (sqrt.f64 2)) (+.f64 (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2)) a) (pow.f64 angle 4)) (.f64 (/.f64 (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 -1/129600 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2))))) a) (pow.f64 angle 6)))))))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))
(sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2)))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 1/4 (*.f64 x-scale (sqrt.f64 8))))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (.f64 a a) (.f64 (.f64 a a) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 (sqrt.f64 (.f64 (+.f64 1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (sqrt.f64 8) (*.f64 a x-scale))) -1/4))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (sqrt.f64 8) (*.f64 a x-scale))) -1/4))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (sqrt.f64 8) (*.f64 a x-scale))) -1/4))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.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 1 (pow.f64 y-scale 2))))))
(.f64 -1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 y-scale x-scale) (*.f64 a (sqrt.f64 8)))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (sqrt.f64 8) (*.f64 a x-scale))) -1/4))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (*.f64 a x-scale)))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8)))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (.f64 (sqrt.f64 2) x-scale) a) (sqrt.f64 8)))
(.f64 (.f64 (.f64 1/4 x-scale) (.f64 a (sqrt.f64 2))) (sqrt.f64 8))
(+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (*.f64 a (sqrt.f64 8))))))
(fma.f64 -1/259200 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 angle angle) (.f64 (.f64 a (sqrt.f64 8)) (pow.f64 (PI.f64) 2))))) (.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8)))))
(fma.f64 -1/259200 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (.f64 (.f64 angle (.f64 angle a)) (sqrt.f64 8)) (pow.f64 (PI.f64) 2))) (.f64 1/4 (.f64 (.f64 (*.f64 (sqrt.f64 2) x-scale) a) (sqrt.f64 8))))
(fma.f64 -1/259200 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 angle (.f64 angle a)))) (.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8))) (.f64 (.f64 (.f64 1/4 x-scale) (.f64 a (sqrt.f64 2))) (sqrt.f64 8)))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (*.f64 a (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 angle 4) (sqrt.f64 8)) (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2)))) a)) (fma.f64 -1/259200 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 angle angle) (.f64 (.f64 a (sqrt.f64 8)) (pow.f64 (PI.f64) 2))))) (.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (*.f64 a (sqrt.f64 8))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 y-scale (sqrt.f64 2)) a))) 2))) a)) (fma.f64 -1/259200 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (.f64 (.f64 angle (.f64 angle a)) (sqrt.f64 8)) (pow.f64 (PI.f64) 2))) (.f64 1/4 (.f64 (.f64 (.f64 (sqrt.f64 2) x-scale) a) (sqrt.f64 8)))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 y-scale y-scale)) a) (.f64 (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2)) (sqrt.f64 8)))) (fma.f64 -1/259200 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 angle (.f64 angle a)))) (.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8))) (.f64 (.f64 (.f64 1/4 x-scale) (*.f64 a (sqrt.f64 2))) (sqrt.f64 8))))
(+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 6) (.f64 (-.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/64800 (/.f64 (.f64 (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 y-scale (sqrt.f64 2)))) 2)) (pow.f64 (PI.f64) 2)) (pow.f64 (sqrt.f64 2) 2)))) (sqrt.f64 8))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 1/8 (/.f64 (.f64 x-scale (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (.f64 (sqrt.f64 8) (-.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)) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 a (pow.f64 (PI.f64) 2)) (.f64 (sqrt.f64 2) y-scale))) 2)))))) (.f64 (sqrt.f64 2) a))) (+.f64 (.f64 -1/259200 (/.f64 (.f64 x-scale (.f64 (pow.f64 angle 2) (.f64 a (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 2))))) (sqrt.f64 2))) (.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 2) (.f64 a (sqrt.f64 8))))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 angle 6)) (.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000))) (.f64 1/64800 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2)) (/.f64 (pow.f64 (sqrt.f64 2) 2) (pow.f64 (PI.f64) 2))))) (sqrt.f64 8))) a)) (fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 (pow.f64 angle 4) (sqrt.f64 8)) (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (/.f64 (.f64 y-scale y-scale) (.f64 a a))) (pow.f64 (.f64 -1/64800 (/.f64 (.f64 (pow.f64 (PI.f64) 2) a) (.f64 y-scale (sqrt.f64 2)))) 2)))) a)) (fma.f64 -1/259200 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 (.f64 angle angle) (.f64 (.f64 a (sqrt.f64 8)) (pow.f64 (PI.f64) 2))))) (.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8)))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (+.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (/.f64 (.f64 1/64800 (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 y-scale (sqrt.f64 2)) a))) 2))) (/.f64 2 (pow.f64 (PI.f64) 2)))) (.f64 (pow.f64 angle 6) (sqrt.f64 8))) (/.f64 a (.f64 y-scale y-scale)))) (fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 angle 4) (sqrt.f64 8))) (-.f64 (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (pow.f64 (/.f64 y-scale a) 2) 1/3149280000)) (pow.f64 (.f64 -1/64800 (/.f64 (pow.f64 (PI.f64) 2) (/.f64 (.f64 y-scale (sqrt.f64 2)) a))) 2))) a)) (fma.f64 -1/259200 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (.f64 (.f64 angle (.f64 angle a)) (sqrt.f64 8)) (pow.f64 (PI.f64) 2))) (.f64 1/4 (.f64 (.f64 (*.f64 (sqrt.f64 2) x-scale) a) (sqrt.f64 8))))))
(fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 (pow.f64 angle 6) (.f64 y-scale y-scale)) a) (.f64 (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000)) (.f64 -1/129600 (.f64 (pow.f64 (PI.f64) 2) (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2))))) (sqrt.f64 8)))) (fma.f64 1/8 (.f64 (/.f64 x-scale (sqrt.f64 2)) (.f64 (/.f64 (.f64 (pow.f64 angle 4) (.f64 y-scale y-scale)) a) (.f64 (-.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (.f64 (pow.f64 (PI.f64) 4) 1/3149280000)) (pow.f64 (.f64 -1/64800 (.f64 (/.f64 a y-scale) (/.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 2)))) 2)) (sqrt.f64 8)))) (fma.f64 -1/259200 (.f64 (/.f64 x-scale (/.f64 (sqrt.f64 2) (.f64 angle (.f64 angle a)))) (.f64 (pow.f64 (PI.f64) 2) (sqrt.f64 8))) (.f64 (.f64 (.f64 1/4 x-scale) (.f64 a (sqrt.f64 2))) (sqrt.f64 8)))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))))))
(.f64 1/4 (.f64 (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (.f64 y-scale (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8))))
(.f64 y-scale (.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) (pow.f64 (/.f64 a y-scale) 2))) (*.f64 x-scale (sqrt.f64 8))) 1/4))
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(/.f64 (pow.f64 a 2) (pow.f64 y-scale 2))
(pow.f64 (/.f64 a y-scale) 2)
(-.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 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) 2) (cbrt.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)))) (pow.f64 (cbrt.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)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4))) (fabs.f64 (cbrt.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))))))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (fabs.f64 (cbrt.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))))
(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 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1/2)
(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))
(cos.f64 (.f64 (PI.f64) (.f64 angle 1/180)))
(cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))
(fabs.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 (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 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(.f64 1 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))) (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)))
(.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2)) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2)) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (fabs.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (fabs.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (pow.f64 1 1/2) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(.f64 (pow.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2) 1/2) (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 1/2))
(.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 2)) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (fabs.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(.f64 (fabs.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))) (sqrt.f64 (cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) 1))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) 2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) -1))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 4) (pow.f64 (/.f64 a y-scale) 4))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (+.f64 -1 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 4) (pow.f64 (/.f64 a y-scale) 4))) (sqrt.f64 (.f64 (pow.f64 (/.f64 a y-scale) 2) (+.f64 -1 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 3) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))) (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2) 2) (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) 2))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) 3) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))) (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) 2) (.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2))))))
(/.f64 (hypot.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2) 3/2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3/2)) (sqrt.f64 (fma.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) 2)) (pow.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) 4))))
(/.f64 (hypot.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2) 3/2) (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3/2)) (sqrt.f64 (fma.f64 (pow.f64 (/.f64 a y-scale) 2) (-.f64 (pow.f64 (/.f64 a y-scale) 2) (pow.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 2)) (pow.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) 4))))
(pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2) 1/2)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(pow.f64 (sqrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 2)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(pow.f64 (cbrt.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 3)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(pow.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3) 1/3)
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(fabs.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(log.f64 (exp.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(log.f64 (+.f64 1 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(cbrt.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 3))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)))
(hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)))
(hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)))
(exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(exp.f64 (.f64 (log.f64 (pow.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 2)) 1/2))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(exp.f64 (.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))) 1))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(log1p.f64 (expm1.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))
(-.f64 (exp.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))) 1)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 1)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(pow.f64 (sqrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))) 2)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(pow.f64 (cbrt.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))) 3)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(pow.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 3) 1/3)
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(sqrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 2))
(sqrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale))) 2))
(fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(log.f64 (exp.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(cbrt.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)))) 3))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) 3) (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3)))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) 1/4) 3) (pow.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) 3)))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(expm1.f64 (log1p.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(exp.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(exp.f64 (.f64 (log.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale))))) 1))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(log1p.f64 (expm1.f64 (.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 1/4 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale))))))
(.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)) (.f64 (.f64 1/4 (sqrt.f64 8)) (*.f64 y-scale x-scale)))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 a y-scale) 2))) 1)
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 a (/.f64 (/.f64 a y-scale) y-scale))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (pow.f64 (/.f64 a y-scale) 2) 1)
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 1 (pow.f64 (/.f64 a y-scale) 2))
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (sqrt.f64 a) (.f64 (sqrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale)))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 2) (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (cbrt.f64 a) (/.f64 (/.f64 a y-scale) y-scale)))
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (/.f64 (/.f64 a y-scale) y-scale) (cbrt.f64 a)))
(.f64 (cbrt.f64 (.f64 a a)) (.f64 (/.f64 a (.f64 y-scale y-scale)) (cbrt.f64 a)))
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 (/.f64 a y-scale) y-scale) a)
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (neg.f64 a) (/.f64 1 (.f64 y-scale (neg.f64 (/.f64 y-scale a)))))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 (/.f64 a y-scale) 1) (/.f64 a y-scale))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 1 y-scale) (/.f64 a (/.f64 y-scale a)))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 1 (/.f64 y-scale (sqrt.f64 a))) (/.f64 a (/.f64 y-scale (sqrt.f64 a))))
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (/.f64 1 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 a (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(/.f64 (.f64 1 (/.f64 a (cbrt.f64 (.f64 y-scale (/.f64 y-scale a))))) (cbrt.f64 (pow.f64 (*.f64 y-scale (/.f64 y-scale a)) 2)))
(/.f64 (/.f64 a (cbrt.f64 (.f64 y-scale (/.f64 y-scale a)))) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2)))
(/.f64 a (.f64 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2)) (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(.f64 (/.f64 a (.f64 y-scale y-scale)) a)
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 (/.f64 a y-scale) (neg.f64 y-scale)) (neg.f64 a))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 (sqrt.f64 a) y-scale) (/.f64 (sqrt.f64 a) (/.f64 y-scale a)))
(pow.f64 (/.f64 a y-scale) 2)
(*.f64 (/.f64 (sqrt.f64 a) (/.f64 y-scale a)) (/.f64 (sqrt.f64 a) y-scale))
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (/.f64 (sqrt.f64 a) 1) (/.f64 (sqrt.f64 a) (.f64 y-scale (/.f64 y-scale a))))
(pow.f64 (/.f64 a y-scale) 2)
(.f64 (/.f64 (sqrt.f64 a) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2))) (/.f64 (sqrt.f64 a) (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(/.f64 (.f64 1 (/.f64 a (cbrt.f64 (.f64 y-scale (/.f64 y-scale a))))) (cbrt.f64 (pow.f64 (*.f64 y-scale (/.f64 y-scale a)) 2)))
(/.f64 (/.f64 a (cbrt.f64 (.f64 y-scale (/.f64 y-scale a)))) (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2)))
(/.f64 a (.f64 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2)) (cbrt.f64 (*.f64 y-scale (/.f64 y-scale a)))))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) y-scale) (/.f64 (cbrt.f64 a) (/.f64 y-scale a)))
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (/.f64 (/.f64 a y-scale) y-scale) (cbrt.f64 a)))
(.f64 (cbrt.f64 (.f64 a a)) (.f64 (/.f64 a (.f64 y-scale y-scale)) (cbrt.f64 a)))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale a)) (/.f64 (cbrt.f64 a) y-scale))
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (/.f64 (/.f64 a y-scale) y-scale) (cbrt.f64 a)))
(.f64 (cbrt.f64 (.f64 a a)) (.f64 (/.f64 a (.f64 y-scale y-scale)) (cbrt.f64 a)))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) 1) (/.f64 (cbrt.f64 a) (*.f64 y-scale (/.f64 y-scale a))))
(.f64 (cbrt.f64 (.f64 a a)) (*.f64 (/.f64 (/.f64 a y-scale) y-scale) (cbrt.f64 a)))
(.f64 (cbrt.f64 (.f64 a a)) (.f64 (/.f64 a (.f64 y-scale y-scale)) (cbrt.f64 a)))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale (sqrt.f64 a))) (/.f64 (cbrt.f64 a) (/.f64 y-scale (sqrt.f64 a))))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (/.f64 y-scale (sqrt.f64 a))) (*.f64 (/.f64 (cbrt.f64 a) y-scale) (sqrt.f64 a)))
(/.f64 (.f64 (.f64 (cbrt.f64 (*.f64 a a)) (/.f64 (cbrt.f64 a) y-scale)) (sqrt.f64 a)) (/.f64 y-scale (sqrt.f64 a)))
(.f64 (.f64 (.f64 (sqrt.f64 a) (/.f64 (cbrt.f64 a) y-scale)) (/.f64 (cbrt.f64 (.f64 a a)) y-scale)) (sqrt.f64 a))
(.f64 (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 (*.f64 y-scale (/.f64 y-scale a)) 2))) (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)))
(.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) (/.f64 (cbrt.f64 (.f64 a a)) (cbrt.f64 (pow.f64 (*.f64 y-scale (/.f64 y-scale a)) 2))))
(/.f64 (cbrt.f64 (.f64 a a)) (/.f64 (cbrt.f64 (pow.f64 (.f64 y-scale (/.f64 y-scale a)) 2)) (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2))))
(pow.f64 (pow.f64 (/.f64 a y-scale) 2) 1)
(pow.f64 (/.f64 a y-scale) 2)
(pow.f64 (cbrt.f64 (pow.f64 (/.f64 a y-scale) 2)) 3)
(pow.f64 (/.f64 a y-scale) 2)
(pow.f64 (pow.f64 (/.f64 y-scale a) 2) -1)
(pow.f64 (/.f64 a y-scale) 2)
(pow.f64 (/.f64 a y-scale) 2)
(pow.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3) 1/3)
(pow.f64 (/.f64 a y-scale) 2)
(neg.f64 (/.f64 a (*.f64 y-scale (neg.f64 (/.f64 y-scale a)))))
(pow.f64 (/.f64 a y-scale) 2)
(sqrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 2))
(sqrt.f64 (pow.f64 (/.f64 a y-scale) 4))
(log.f64 (exp.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (/.f64 a y-scale) 2)
(log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 a y-scale) 2))))
(pow.f64 (/.f64 a y-scale) 2)
(cbrt.f64 (pow.f64 (pow.f64 (/.f64 a y-scale) 2) 3))
(pow.f64 (/.f64 a y-scale) 2)
(expm1.f64 (log1p.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (/.f64 a y-scale) 2)
(exp.f64 (log.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (/.f64 a y-scale) 2)
(exp.f64 (*.f64 (log.f64 (pow.f64 (/.f64 a y-scale) 2)) 1))
(pow.f64 (/.f64 a y-scale) 2)
(log1p.f64 (expm1.f64 (pow.f64 (/.f64 a y-scale) 2)))
(pow.f64 (/.f64 a y-scale) 2)

localize289.0ms (0.2%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	74.0%	(sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))
✓	61.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
	58.9%	(cos.f64 (.f64 1/180 (.f64 angle (PI.f64))))

Compiler

Compiled 611 to 343 computations (43.9% saved)

series152.0ms (0.1%)

Counts

2 → 72

Calls

18 calls:

Time	Variable		Point	Expression
92.0ms	x-scale	@	inf	(-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
29.0ms	angle	@	0	(-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
7.0ms	y-scale	@	0	(-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
3.0ms	y-scale	@	inf	(-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
3.0ms	x-scale	@	0	(-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))

rewrite121.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

698×	`add-sqr-sqrt`
686×	`*-un-lft-identity`
680×	`pow1`
646×	`add-exp-log`
646×	`add-log-exp`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	31	434
1	688	434

Stop Event

1×	node limit

Counts

2 → 45

Calls

Call 1

Inputs

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

(sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))

Outputs

(((+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (*.f64 (-.f64 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (-.f64 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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)) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) (-.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((*.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2) (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 1 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 3)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) 2) (*.f64 (-.f64 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2) (*.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) 3) (pow.f64 (-.f64 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) 2) (-.f64 (*.f64 (-.f64 (/.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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (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 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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 (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log.f64 (exp.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((cbrt.f64 (*.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.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))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((expm1.f64 (log1p.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((exp.f64 (log.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)) ((log1p.f64 (expm1.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) (sqrt.f64 (fma.f64 4 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))) #f)))

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

simplify382.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

1024×	`associate-r`
784×	`associate-/r*`
726×	`*-commutative`
726×	`associate-l`
716×	`associate-/l*`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	569	51335
1	2001	50007

Stop Event

1×	node limit

Counts

117 → 190

Calls

Call 1

Inputs
(.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (+.f64 (.f64 (pow.f64 angle 8) (-.f64 (+.f64 (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (+.f64 (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2)))))) (pow.f64 y-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4)) (.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/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (+.f64 (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))) (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) 2))))))) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 8) (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))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 8) (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))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (.f64 -1/4 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 8) (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) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (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 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 8) (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) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(/.f64 1 (pow.f64 y-scale 2))
(+.f64 (/.f64 1 (pow.f64 y-scale 2)) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1))
(+.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 1)
(.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 1/2) (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2))
(/.f64 1 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (-.f64 (.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1)
(log.f64 (exp.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(cbrt.f64 (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))
(expm1.f64 (log1p.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(exp.f64 (log.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(log1p.f64 (expm1.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1)
(.f64 1 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
(.f64 (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1/2) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2))
(pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))

Outputs
(.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -1/2 (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))))) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 y-scale y-scale) 1/3149280000))) (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2)))) -1/2)) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -1/2 (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))))) (fma.f64 (pow.f64 angle 6) (+.f64 (fma.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/12244400640000000))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (-.f64 (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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000)) (.f64 y-scale y-scale)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))))))))) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 y-scale y-scale) 1/3149280000))) (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2)))) -1/2)) (fma.f64 (pow.f64 angle 6) (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (+.f64 (+.f64 (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 y-scale y-scale)) (.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) 1/765275040000000)))) (.f64 2 (.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (.f64 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (pow.f64 y-scale 4))) -1/2)))) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))))))))
(+.f64 (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2)))))) (+.f64 (.f64 (pow.f64 angle 8) (-.f64 (+.f64 (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (+.f64 (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2))) (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (+.f64 (.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2))) (.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (pow.f64 y-scale 2)))))) (pow.f64 y-scale 2))) (+.f64 (.f64 4 (+.f64 (.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 -1/816293376000000 (pow.f64 (PI.f64) 6)) (.f64 -1/12244400640000000 (pow.f64 (PI.f64) 6))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (+.f64 (.f64 1/2040733440000000 (pow.f64 (PI.f64) 6)) (.f64 1/1224440064000000 (pow.f64 (PI.f64) 6)))) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/3149280000 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 4)) (.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/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))))) (pow.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) 2)))) (+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))) (-.f64 (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (+.f64 (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))) (.f64 4 (+.f64 (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)))) 2))))))) (+.f64 (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))))))))) (.f64 (pow.f64 angle 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 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -1/2 (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))))) (fma.f64 (pow.f64 angle 8) (+.f64 (fma.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) (fma.f64 1/22216240521216000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) (fma.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale x-scale)) (fma.f64 1/793437161472000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) (/.f64 (.f64 -1/396718580736000000000 (pow.f64 (PI.f64) 8)) (.f64 x-scale x-scale)))))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (-.f64 (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 x-scale x-scale)) -1/347128758144000000000) (fma.f64 1/634749729177600000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) 29/22216240521216000000000))) (.f64 y-scale y-scale)) (fma.f64 4 (fma.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale))) (fma.f64 -1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 (PI.f64) 6) 1/765275040000000)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 -1/3149280000 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)))))))) (fma.f64 2 (.f64 (-.f64 (/.f64 (.f64 1/32400 (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) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000))) (pow.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) 2)))) (fma.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000)) (.f64 y-scale y-scale)) (.f64 4 (fma.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.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/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 1/32400 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2)))))))) (pow.f64 (.f64 1/2 (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2)))) 2)))))) (fma.f64 (pow.f64 angle 6) (+.f64 (fma.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/12244400640000000))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (-.f64 (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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000)) (.f64 y-scale y-scale)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))))))))) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 -1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))
(fma.f64 (pow.f64 angle 4) (+.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 4) (/.f64 (.f64 y-scale y-scale) 1/3149280000))) (.f64 (.f64 (.f64 y-scale y-scale) (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2)))) -1/2)) (fma.f64 (pow.f64 angle 8) (+.f64 (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) 1/793437161472000000000) (/.f64 (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) 1/617117792256000000000)) (.f64 (.f64 y-scale (.f64 y-scale (-.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 8) -1/347128758144000000000) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale y-scale)) 1/347128758144000000000)) (.f64 y-scale y-scale)) (fma.f64 4 (fma.f64 -1/2777030065152000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) (fma.f64 1/32400 (/.f64 (.f64 (pow.f64 (PI.f64) 6) -1/765275040000000) (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 -1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000)) (fma.f64 -1/396718580736000000000 (/.f64 (pow.f64 (PI.f64) 8) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (PI.f64) 8) 1/3149280000) (.f64 y-scale y-scale)) -1/3149280000) (.f64 x-scale x-scale)))))) (fma.f64 2 (.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000)))) (pow.f64 (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000)) 2)))) (fma.f64 1/2 (.f64 (+.f64 (+.f64 (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 y-scale y-scale)) (.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) 1/765275040000000)))) (.f64 2 (.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (.f64 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (pow.f64 y-scale 4))) -1/2)) (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (pow.f64 y-scale 4))) (pow.f64 (.f64 (.f64 y-scale y-scale) (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) 1/2)) 2))))) -1/2)) (fma.f64 (pow.f64 angle 6) (+.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (+.f64 (+.f64 (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 y-scale y-scale)) (.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) 1/765275040000000)))) (.f64 2 (.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (.f64 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (pow.f64 y-scale 4))) -1/2)))) (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale)))))))))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.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) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) 2)) -1/2))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) -1/2)))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 x-scale 4)))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (fma.f64 1/4 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) 2)) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) 2)) -1/2)))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 6) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (.f64 -1/4 (/.f64 (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (fma.f64 1/2 (/.f64 (pow.f64 x-scale 6) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (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/4 (/.f64 (pow.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) 2) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))) (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 x-scale 4)))) (.f64 -1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (fma.f64 1/2 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (+.f64 (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2) (/.f64 (.f64 (.f64 -1/4 (pow.f64 (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8)))) (fma.f64 1/4 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) 2)) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)))))) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) 2)) -1/2)))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))
(/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 y-scale y-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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 x-scale x-scale))
(/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 x-scale x-scale))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (*.f64 x-scale x-scale)))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 x-scale x-scale))) (.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 8) (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))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 8) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (.f64 (pow.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) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 8))) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 8) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8) (pow.f64 (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) y-scale)) 2))))) (.f64 (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 x-scale 2))
(/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 y-scale y-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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 x-scale x-scale))
(/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 x-scale x-scale))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (*.f64 x-scale x-scale)))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (+.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) (.f64 x-scale x-scale))) (.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))))))))
(-.f64 (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 8) (.f64 (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 8) (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))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 8) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (.f64 (pow.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) 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (+.f64 (fma.f64 1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))) (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 8))) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 8) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8) (pow.f64 (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)))) 2)) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))) (pow.f64 (.f64 1/2 (.f64 (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) y-scale)) y-scale)) 2))))) (.f64 (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 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) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(-.f64 (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 6) (+.f64 (.f64 -1/4 (/.f64 (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (fma.f64 1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (fma.f64 1/2 (/.f64 (pow.f64 y-scale 6) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (fma.f64 -1/4 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (pow.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) 2))) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (fma.f64 1/2 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (fma.f64 -1/4 (.f64 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8)) (pow.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (pow.f64 (.f64 1/2 (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 2))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) -1/2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale)))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale)))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 8) (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) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 8) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (.f64 (pow.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) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))))) 2)) (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 y-scale y-scale)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (+.f64 (fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (fma.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8) (pow.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)))) 2))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) (pow.f64 y-scale 8))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (pow.f64 y-scale 2))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) -1/2)) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale)))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (*.f64 y-scale y-scale)))
(-.f64 (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8))) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 8) (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) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 8)) (/.f64 (fma.f64 -1/4 (/.f64 (pow.f64 x-scale 8) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 8) (.f64 (pow.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) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))))) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))))) 2)) (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 y-scale y-scale)) (fma.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))))))) (.f64 -1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (+.f64 (fma.f64 -1/2 (.f64 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))))) (/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 -1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (.f64 y-scale y-scale))) (/.f64 (.f64 (.f64 1/2 (.f64 x-scale x-scale)) (fma.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 8) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 8) (pow.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)))) 2))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) (pow.f64 y-scale 8))))
(/.f64 1 (pow.f64 y-scale 2))
(/.f64 1 (*.f64 y-scale y-scale))
(+.f64 (/.f64 1 (pow.f64 y-scale 2)) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))))
(+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 1/2 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 angle angle) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 1/2 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale angle) (.f64 y-scale angle)))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))))))
(fma.f64 1/2 (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))) (+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 1/2 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 angle angle) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))
(fma.f64 1/2 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (.f64 y-scale y-scale) (pow.f64 angle 4))) (+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 1/2 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale angle) (*.f64 y-scale angle))))))
(+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 4) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))) 2))))) (+.f64 (/.f64 1 (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (.f64 1/2 (.f64 (pow.f64 y-scale 2) (.f64 (pow.f64 angle 6) (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (+.f64 (.f64 1/32400 (/.f64 (.f64 (+.f64 (.f64 1/12597120000 (pow.f64 (PI.f64) 4)) (.f64 1/4199040000 (pow.f64 (PI.f64) 4))) (pow.f64 (PI.f64) 2)) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2)))))))) (+.f64 (.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2))))) (+.f64 (.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2)))))) (.f64 -2 (/.f64 (-.f64 (+.f64 (.f64 1/1224440064000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2))) (.f64 1/2040733440000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 x-scale 2)))) (+.f64 (.f64 -1/816293376000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))) (.f64 -1/12244400640000000 (/.f64 (pow.f64 (PI.f64) 6) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (+.f64 (.f64 4 (+.f64 (.f64 -1/1049760000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))) (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))) (+.f64 (pow.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 x-scale 2))) (+.f64 (.f64 1/12597120000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))) (.f64 1/4199040000 (/.f64 (pow.f64 (PI.f64) 4) (pow.f64 y-scale 2))))) (pow.f64 y-scale 2))))) (pow.f64 (.f64 1/2 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (pow.f64 y-scale 2) (pow.f64 x-scale 2))))))) 2)) (+.f64 (.f64 -2 (/.f64 (-.f64 (.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 x-scale 2))) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2))) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2)))))))))))))))
(fma.f64 1/2 (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 angle 4)) (-.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) -1/787320000) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) 2))) (+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (.f64 (.f64 y-scale y-scale) (.f64 (.f64 angle angle) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (.f64 (.f64 (.f64 y-scale y-scale) (pow.f64 angle 6)) (-.f64 (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 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (fma.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale y-scale)) -1/765275040000000)) (.f64 y-scale y-scale)))))) (.f64 1/2 (.f64 (pow.f64 y-scale 4) (.f64 (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.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) (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (.f64 -2 (/.f64 (-.f64 (.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale))) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) 1/3149280000)) (.f64 y-scale y-scale))))) (pow.f64 (.f64 1/2 (.f64 (.f64 y-scale y-scale) (fma.f64 -2 (/.f64 (-.f64 (/.f64 (.f64 1/32400 (pow.f64 (PI.f64) 2)) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (.f64 1/8100 (/.f64 (pow.f64 (PI.f64) 2) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) 2)))))))))))
(fma.f64 1/2 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (.f64 y-scale y-scale) (pow.f64 angle 4))) (+.f64 (/.f64 1 (.f64 y-scale y-scale)) (.f64 (.f64 (.f64 y-scale y-scale) 1/2) (+.f64 (.f64 angle (.f64 angle (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))))) (.f64 (pow.f64 angle 6) (+.f64 (+.f64 (fma.f64 -2 (/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 x-scale x-scale)) 1/765275040000000) (/.f64 (pow.f64 (PI.f64) 6) (/.f64 (.f64 y-scale y-scale) -1/765275040000000))) (.f64 y-scale y-scale)) (.f64 4 (+.f64 (fma.f64 1/32400 (.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 (PI.f64) 4) 1/3149280000) (.f64 x-scale x-scale))) (.f64 1/102036672000000 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))))) (.f64 (/.f64 (pow.f64 (PI.f64) 6) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) 1/765275040000000)))) (.f64 2 (.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (.f64 (.f64 (+.f64 (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale)))) -1/196830000) (-.f64 (+.f64 (pow.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) 2) (/.f64 -2 (/.f64 (.f64 y-scale y-scale) (fma.f64 -1/3149280000 (/.f64 (pow.f64 (PI.f64) 4) (.f64 x-scale x-scale)) (.f64 (/.f64 (pow.f64 (PI.f64) 4) (.f64 y-scale y-scale)) -1/3149280000))))) (pow.f64 (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (.f64 (.f64 y-scale y-scale) 1/2)) 2))) (.f64 (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale))))) (pow.f64 y-scale 4))) -1/2)))))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))) 2) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 (pow.f64 x-scale 2) (pow.f64 y-scale 2))))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(fma.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))))
(fma.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (.f64 (pow.f64 x-scale 4) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))))
(fma.f64 1/2 (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (fma.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (pow.f64 x-scale 4)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (fma.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (fma.f64 -1/4 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 x-scale 4)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 y-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale))) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2))) (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 (pow.f64 x-scale 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 6) (.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))) (pow.f64 y-scale 2)) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)))))) (.f64 (pow.f64 x-scale 6) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 x-scale 4) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (fma.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (fma.f64 -1/4 (.f64 (/.f64 (pow.f64 y-scale 6) (pow.f64 x-scale 6)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))))) (.f64 1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (pow.f64 x-scale 4))) (-.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (.f64 2 (.f64 y-scale y-scale))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)))))))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2))
(/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 1/2 (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2) 2))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 y-scale 2)) (+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 y-scale 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (pow.f64 y-scale 4) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6) (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 1/2 (+.f64 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (fma.f64 -1/4 (/.f64 (.f64 (pow.f64 y-scale 4) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2))) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))))) (.f64 1/2 (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 x-scale 4)) (pow.f64 (.f64 1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) 2)))))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))) (+.f64 (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)))))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2))
(/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale))
(/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)))
(fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))
(fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale)))
(+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2)))))
(+.f64 (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2))))
(+.f64 (.f64 -1/4 (/.f64 (.f64 (pow.f64 x-scale 6) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2)))))) (.f64 (pow.f64 y-scale 6) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6)))) (+.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (.f64 (pow.f64 y-scale 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 x-scale 2)) (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 (pow.f64 x-scale 2) (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))) (.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 x-scale 2))))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))) (.f64 (pow.f64 y-scale 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))
(fma.f64 -1/4 (.f64 (/.f64 (pow.f64 x-scale 6) (pow.f64 y-scale 6)) (/.f64 (.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2))) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 6))) (+.f64 (fma.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)) (/.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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 1/2 (.f64 (/.f64 (.f64 x-scale x-scale) (pow.f64 y-scale 4)) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))) 2)) (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(fma.f64 -1/4 (/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (.f64 (.f64 2 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 x-scale 6))) (.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 6) (pow.f64 y-scale 6))) (+.f64 (fma.f64 1/2 (.f64 (/.f64 x-scale (/.f64 (.f64 y-scale y-scale) x-scale)) (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) (.f64 (.f64 1/2 (/.f64 x-scale (/.f64 (pow.f64 y-scale 4) x-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 4) (pow.f64 (/.f64 (.f64 1/2 (.f64 x-scale x-scale)) (/.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) 2)) 2)) (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) 2)))))
(+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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))) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 1))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(+.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 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 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 1)
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 1 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))
(.f64 (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)) (cbrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))))
(.f64 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (cbrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))))) (cbrt.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (/.f64 1 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) 1) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))))
(/.f64 (.f64 1 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) 3))) (+.f64 (.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (+.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))) 2))))
(.f64 (+.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 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 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (-.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))) 1/2) (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1/2))
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 1 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 1 (/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3))))
(/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) 1) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 x-scale x-scale)))))))
(/.f64 (.f64 1 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) 3))) (+.f64 (.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (+.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 x-scale x-scale))) 2))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2) (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (+.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))) (+.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))))) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2) (.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (-.f64 (.f64 (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (-.f64 (/.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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) 3) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) 2) (.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (+.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 3) (pow.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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))) (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) 2) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 3) (pow.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))) 3)) (+.f64 (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))) 2) (.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (-.f64 (neg.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))))
(pow.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.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 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))) 1)
(-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(log.f64 (exp.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))
(cbrt.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (-.f64 (/.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 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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)))
(cbrt.f64 (.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2))))) (pow.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))) 2)))
(expm1.f64 (log1p.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(exp.f64 (log.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(log1p.f64 (expm1.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 1 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (sqrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (cbrt.f64 (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (cbrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2))))
(.f64 (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) 1/4) (pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/4))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(.f64 (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))) 1/2) (pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1/2))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(pow.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)) 1/2)
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(pow.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2))) 1)
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(log.f64 (exp.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(cbrt.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (.f64 x-scale x-scale) y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(cbrt.f64 (.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale))) 2)) (sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))))
(expm1.f64 (log1p.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(exp.f64 (log.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))
(log1p.f64 (expm1.f64 (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale))) 2)))))
(sqrt.f64 (+.f64 (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))
(sqrt.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale (.f64 x-scale (.f64 x-scale y-scale))) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (*.f64 y-scale y-scale))) 2)))

eval1.4s (1%)

Compiler: Compiled 77044 to 48906 computations (36.5% saved)

prune488.0ms (0.3%)

Pruning

93 alts after pruning (91 fresh and 2 done)

	Pruned	Kept	Total
New	861	63	924
Fresh	16	28	44
Picked	1	0	1
Done	3	2	5
Total	881	93	974

Accurracy

55.5%

Counts

974 → 93

Alt Table

Click to see full alt table

Status	Accuracy	Program
	6.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
	20.9%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale))) 1/4))
	24.8%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale) 1/4))
	20.4%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (*.f64 (/.f64 (sqrt.f64 2) y-scale) a) 1/4))
	15.2%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (pow.f64 (/.f64 a y-scale) 4)))) 1/4))
	12.3%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (log.f64 (exp.f64 (pow.f64 (/.f64 a y-scale) 2))))) 1/4))
	16.7%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 1 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
	20.7%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
	20.6%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
	6.7%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
	22.6%	(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
	9.9%	(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
	22.0%	(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
	26.9%	(.f64 (.f64 1/4 x-scale) (/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1))))
	26.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 a 4))) 2)) (cbrt.f64 (log1p.f64 (.f64 a 4)))) 1))
	12.9%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 a 4)))) (sqrt.f64 (log1p.f64 (.f64 a 4)))) 1))
	26.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 a 4))) 1))
	25.6%	(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4)))) 1))
	5.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))
	2.9%	(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1))
▶	36.7%	(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
▶	5.8%	(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4)))
	26.9%	(.f64 (.f64 1/4 x-scale) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
✓	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
	25.9%	(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
	22.6%	(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
	9.5%	(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
✓	22.1%	(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
	26.0%	(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))
	22.7%	(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
	9.6%	(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
	4.2%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
	15.6%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-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 1 (*.f64 y-scale y-scale)))))
	5.7%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 y-scale y-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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 x-scale x-scale))))
	4.1%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
	1.8%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 1 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))
	1.9%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
	19.9%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
	10.1%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) -1/2))))
	1.8%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))))))))
	13.5%	(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
	6.8%	(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))))) (.f64 -1/4 (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
	23.2%	(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
	25.9%	(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
	4.0%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 1 (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))
	3.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))))))
	4.4%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
	6.1%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))))))
	15.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	20.9%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
	2.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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)))))))))
	5.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
	3.6%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 2) (.f64 y-scale y-scale))) 2))))))))
	9.8%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
▶	11.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
	25.9%	(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
	22.0%	(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
	4.2%	(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 1 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
	1.8%	(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
	5.5%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
	17.4%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
	17.6%	(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 3))
	15.4%	(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	23.2%	(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
	23.3%	(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)))
▶	17.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (.f64 1/180 angle) (PI.f64))) (sqrt.f64 8))))
	20.0%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 8))))
	19.2%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 8))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 8))))
	19.2%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 8))))
	12.1%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3))) (sqrt.f64 8))))
	17.7%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3))) (sqrt.f64 8))))
	14.1%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
	10.6%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
	14.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)))) (sqrt.f64 8))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
	23.6%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))))
▶	17.6%	(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
	22.0%	(.f64 -1/4 (.f64 x-scale (sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
	26.5%	(.f64 -1/4 (.f64 x-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))))
	17.1%	(.f64 -1/4 (.f64 x-scale (expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
	12.2%	(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
	24.8%	(.f64 -1/4 (.f64 x-scale (cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))))
	12.4%	(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
	25.3%	(fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
	25.3%	(fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))

Compiler

Compiled 7838 to 5696 computations (27.3% saved)

localize15.0ms (0%)

Compiler: Compiled 21 to 18 computations (14.3% saved)

localize11.0ms (0%)

Compiler: Compiled 30 to 23 computations (23.3% saved)

localize35.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.6%	(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
✓	99.2%	(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
✓	96.3%	(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
✓	59.2%	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))

Compiler

Compiled 76 to 55 computations (27.6% saved)

series3.0ms (0%)

Counts

4 → 84

Calls

21 calls:

Time	Variable		Point	Expression
0.0ms	angle	@	0	(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
0.0ms	angle	@	inf	(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
0.0ms	angle	@	-inf	(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
0.0ms	angle	@	0	(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
0.0ms	angle	@	0	(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))

rewrite109.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1372×	`unswap-sqr`
1130×	`swap-sqr`
604×	`sqr-pow`
348×	`distribute-rgt-in`
340×	`add-sqr-sqrt`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	124
1	339	124
2	3979	124

Stop Event

1×	node limit

Counts

4 → 71

Calls

Call 1

Inputs
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))

Outputs
(((-.f64 (exp.f64 (log1p.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (cbrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (sqrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (cbrt.f64 (sqrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/6)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (sqrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((sqrt.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (+.f64 1 (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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (.f64 (log.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (sqrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((sqrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) x-scale)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((sqrt.f64 (.f64 8 (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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (.f64 8 (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (pow.f64 b 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) (pow.f64 b 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)) ((log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.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>) ((sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) #f)))

simplify94.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1656×	`fma-def`
1106×	`distribute-rgt-in`
1106×	`distribute-lft-in`
686×	`associate-r`
554×	`log-prod`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	241	6085
1	619	6085
2	2540	5905

Stop Event

1×	node limit

Counts

155 → 143

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 1/180 (.f64 angle (*.f64 (sqrt.f64 8) (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (.f64 1/180 (.f64 angle (.f64 (sqrt.f64 8) (PI.f64)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (*.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (.f64 (sqrt.f64 8) (PI.f64)))))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))))) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 1)
(.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))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (sqrt.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 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(.f64 (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 3/2))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 3) 1/6))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3))
(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))))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))) 1)
(pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 1)
(pow.f64 (sqrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))) 2)
(pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))) 3)
(pow.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 2))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(cbrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 3))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(expm1.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(exp.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 1))
(log1p.f64 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) 1)
(pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 1)
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 2)
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) 1/3)
(sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3))
(cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) (.f64 8 (sqrt.f64 8))))
(cbrt.f64 (.f64 (.f64 8 (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 1))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))))) 1)
(pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 1)
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))) 2)
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))) 3)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 2))
(log.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3))
(cbrt.f64 (.f64 (pow.f64 b 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) (pow.f64 b 3)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8)))) 1))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 angle (.f64 1/180 (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 1/180 (*.f64 angle (PI.f64))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) -1/34992000)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000) (.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 -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/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)) (fma.f64 1/180 (.f64 angle (PI.f64)) (.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 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 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (*.f64 b (sqrt.f64 8))))))
(.f64 1/180 (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (*.f64 angle x-scale)))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8))))) (.f64 -1/34992000 (.f64 (.f64 (.f64 (pow.f64 angle 3) x-scale) (*.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 3))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))))
(fma.f64 -1/34992000 (.f64 (.f64 (.f64 (pow.f64 angle 3) x-scale) (.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 3)) (fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (.f64 (.f64 (pow.f64 angle 5) x-scale) (*.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 5)))))
(fma.f64 1/22674816000000 (.f64 x-scale (.f64 (.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8)) (.f64 (pow.f64 angle 5) b))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000)))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (fma.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (pow.f64 (PI.f64) 7) (sqrt.f64 8))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))))
(fma.f64 -1/34992000 (.f64 (.f64 (.f64 (pow.f64 angle 3) x-scale) (.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 3)) (fma.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (.f64 (pow.f64 angle 7) (.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 7))) (fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (.f64 (.f64 (pow.f64 angle 5) x-scale) (*.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 5))))))
(+.f64 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5))))))) (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 (PI.f64) 7) (.f64 -1/30855889612800000000 (pow.f64 angle 7))))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 1/180 (.f64 angle (*.f64 (sqrt.f64 8) (PI.f64))))
(.f64 1/180 (.f64 angle (*.f64 (PI.f64) (sqrt.f64 8))))
(.f64 (.f64 angle (*.f64 1/180 (PI.f64))) (sqrt.f64 8))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (.f64 1/180 (.f64 angle (.f64 (sqrt.f64 8) (PI.f64)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))) (.f64 1/180 (.f64 angle (*.f64 (PI.f64) (sqrt.f64 8)))))
(fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (sqrt.f64 8))) (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8)))))
(.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (*.f64 (sqrt.f64 8) (PI.f64))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))) (fma.f64 1/22674816000000 (.f64 (.f64 (pow.f64 angle 5) (sqrt.f64 8)) (pow.f64 (PI.f64) 5)) (.f64 1/180 (.f64 angle (*.f64 (PI.f64) (sqrt.f64 8))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (sqrt.f64 8))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (*.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8))))))
(fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (sqrt.f64 8))) (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5))))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))) (+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))) (.f64 1/180 (.f64 angle (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))) (fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (pow.f64 (PI.f64) 7) (sqrt.f64 8))) (fma.f64 1/22674816000000 (.f64 (.f64 (pow.f64 angle 5) (sqrt.f64 8)) (pow.f64 (PI.f64) 5)) (.f64 1/180 (.f64 angle (*.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))) (fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (pow.f64 (PI.f64) 7) (sqrt.f64 8))) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (sqrt.f64 8))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (*.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8)))))))
(+.f64 (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000)))) (.f64 (sqrt.f64 8) (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 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))
(.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8)))))
(.f64 1/180 (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8)))) (.f64 1/180 (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))
(fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))) (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (*.f64 b (sqrt.f64 8))))))
(.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 angle 3) (*.f64 (pow.f64 (PI.f64) 3) -1/34992000)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8)))) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 5))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8)))) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (pow.f64 (PI.f64) 5) (.f64 b (sqrt.f64 8)))))))
(fma.f64 1/180 (.f64 angle (.f64 (sqrt.f64 8) (.f64 (PI.f64) b))) (.f64 b (.f64 (sqrt.f64 8) (fma.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5)))))))
(+.f64 (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7))))) (+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3))))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5))))) (.f64 1/180 (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64))))))))
(fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 b (.f64 (pow.f64 (PI.f64) 7) (sqrt.f64 8)))) (fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8)))) (fma.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (PI.f64) 5))) (.f64 1/180 (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))))
(fma.f64 -1/30855889612800000000 (.f64 (.f64 (pow.f64 angle 7) (.f64 b (sqrt.f64 8))) (pow.f64 (PI.f64) 7)) (fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8)))) (fma.f64 1/180 (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (pow.f64 (PI.f64) 5) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (.f64 b (.f64 (sqrt.f64 8) (fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 (pow.f64 (PI.f64) 5) (.f64 1/22674816000000 (pow.f64 angle 5)))))) (.f64 b (.f64 (sqrt.f64 8) (fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7)) (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) -1/34992000))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 1 (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 (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 angle (.f64 1/180 (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2) (cbrt.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 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (sqrt.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 angle (.f64 1/180 (PI.f64))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (.f64 (cbrt.f64 (sqrt.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 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))
(.f64 (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))
(.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (sqrt.f64 (cbrt.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 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))))
(.f64 (.f64 (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))) (cbrt.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 3/2))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 3) 1/6))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 1)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 3)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) 1/3)
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(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 angle (.f64 1/180 (PI.f64))))
(log.f64 (+.f64 1 (expm1.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))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(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 angle (.f64 1/180 (PI.f64))))
(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 angle (.f64 1/180 (PI.f64))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 1))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(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 angle (.f64 1/180 (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))) 1)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 1)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.f64 (sqrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))) 2)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))) 3)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(pow.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 3) 1/3)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(sqrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 2))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) x-scale))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(cbrt.f64 (pow.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale)) 3))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))) 3)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(expm1.f64 (log1p.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(exp.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 1))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(log1p.f64 (expm1.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))) 1)
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 1)
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 2)
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3)
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) 1/3)
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) 2)))
(log.f64 (pow.f64 (exp.f64 (sqrt.f64 8)) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3) (.f64 8 (sqrt.f64 8))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(cbrt.f64 (.f64 (.f64 8 (sqrt.f64 8)) (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 3)))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 1))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (sqrt.f64 8))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))
(.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))))) 1)
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 1)
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))) 2)
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))) 3)
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3) 1/3)
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 2))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log.f64 (pow.f64 (exp.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8))) 3))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (pow.f64 b 3) (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)) 3) (pow.f64 b 3)))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 b (sqrt.f64 8)))) 1))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))

localize50.0ms (0%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	99.0%	(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)
✓	96.3%	(.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3))
✓	87.9%	(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))
✓	59.2%	(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))

Compiler

Compiled 104 to 78 computations (25% saved)

series24.0ms (0%)

Counts

4 → 64

Calls

24 calls:

Time	Variable		Point	Expression
9.0ms	angle	@	0	(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)
2.0ms	b	@	-inf	(.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3))
2.0ms	angle	@	inf	(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))
1.0ms	angle	@	-inf	(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))
1.0ms	b	@	-inf	(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)

rewrite134.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

1194×	`swap-sqr`
676×	`sqr-pow`
628×	`pow-sqr`
392×	`distribute-rgt-in`
382×	`add-sqr-sqrt`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	20	134
1	405	134
2	4498	134

Stop Event

1×	node limit

Counts

4 → 106

Calls

Call 1

Inputs
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))
(.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)

Outputs
(((-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 1 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/6)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)))
(((-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 1 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (cbrt.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b)) (cbrt.f64 (sqrt.f64 8))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3/2) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3/2)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6)) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6)) (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6)) (cbrt.f64 (sqrt.f64 8))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 2/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) 2) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (exp.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((expm1.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log1p.f64 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3)) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)))) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 1) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale))) 3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 3) 1/3) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (pow.f64 (exp.f64 x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale))))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale))) 1)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)))
(((-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sqrt.f64 8) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 1 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 b b)) 2) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (sqrt.f64 (.f64 b (sqrt.f64 8)))) (sqrt.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (cbrt.f64 (.f64 b b)) 2)) (cbrt.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (.f64 b (sqrt.f64 8)) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6)) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (cbrt.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1) (sqrt.f64 8)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) (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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (.f64 (pow.f64 1 3/2) (pow.f64 1 3/2)) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 3/4) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3) 1/6) (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3) 1/6)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((sqrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3)) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) (pow.f64 (.f64 b (sqrt.f64 8)) 3))) #(struct:rr-input (#<rule -un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule -commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-r> #<rule associate-l> #<rule associate-r/> #<rule associate-l/> #<rule associate-/r> #<rule associate-/l> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule -inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule -lft-identity> #<rule -rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((cbrt.f64 (.f64 (pow.f64 (.f64 b (sqrt.f64 8)) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) 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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) #f)) ((log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.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>) ((sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)) (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (*.f64 b (sqrt.f64 8)))) 3)) #f)))

simplify111.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

1490×	`distribute-rgt-in`
1490×	`distribute-lft-in`
896×	`associate-l`
870×	`associate-r`
350×	`*-commutative`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	292	7562
1	689	7250
2	3144	7244

Stop Event

1×	node limit

Counts

170 → 180

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 3/2))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 3) 1/6))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 1)
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1)
(.f64 1 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 1/6))
(.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6)))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b)) (cbrt.f64 (sqrt.f64 8)))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3/2) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))) 3/2))
(.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6)) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(.f64 (.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6)) (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1/6)))
(.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6)) (cbrt.f64 (sqrt.f64 8)))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1)
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3)
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 2/3)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) 2)
(pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3)
(sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))))
(log.f64 (exp.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
(expm1.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(exp.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(exp.f64 (.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))) 1))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1/3))
(log1p.f64 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)))) 1)
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 1)
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))) 2)
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))) 3)
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 3) 1/3)
(sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 2))
(log.f64 (pow.f64 (exp.f64 x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 3))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale))) 1))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 1)
(.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 (sqrt.f64 8) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b))
(.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 1)
(.f64 1 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (*.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (cbrt.f64 (.f64 b b)) 2) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (*.f64 b (sqrt.f64 8))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) (sqrt.f64 8))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (sqrt.f64 8)) b)
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (sqrt.f64 (.f64 b (sqrt.f64 8)))) (sqrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (cbrt.f64 (.f64 b b)) 2)) (cbrt.f64 (*.f64 b (sqrt.f64 8))))
(.f64 (.f64 (.f64 b (sqrt.f64 8)) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6)) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (cbrt.f64 (*.f64 b (sqrt.f64 8))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 1) (sqrt.f64 8))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (.f64 (pow.f64 1 3/2) (pow.f64 1 3/2)) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))
(.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 3/4) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2))) 3/4))
(.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3) 1/6) (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3) 1/6))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3))
(cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) (pow.f64 (.f64 b (sqrt.f64 8)) 3)))
(cbrt.f64 (.f64 (pow.f64 (.f64 b (sqrt.f64 8)) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (.f64 1/180 (PI.f64)) angle)
(.f64 angle (.f64 1/180 (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 (*.f64 1/180 (PI.f64)) angle))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.f64 -1/34992000 (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 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 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))))))
(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 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))
(.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))
(fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8))))) (.f64 -1/34992000 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (*.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))))))
(.f64 x-scale (+.f64 (.f64 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8)))) 1/180) (.f64 (.f64 (pow.f64 angle 3) (.f64 (pow.f64 (PI.f64) 3) (*.f64 b (sqrt.f64 8)))) -1/34992000)))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (sqrt.f64 8) (PI.f64))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))) (fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (.f64 b (*.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8))) x-scale)))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8))) x-scale)) (.f64 x-scale (+.f64 (.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (pow.f64 (PI.f64) 5) (*.f64 b (sqrt.f64 8))))))))
(+.f64 (.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 3)))))) (+.f64 (.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 7)))))) (+.f64 (.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (sqrt.f64 8) (pow.f64 (PI.f64) 5)))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (pow.f64 angle 3) (.f64 b (.f64 (pow.f64 (PI.f64) 3) (sqrt.f64 8))))) (fma.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 b (.f64 (pow.f64 (PI.f64) 7) (sqrt.f64 8))))) (fma.f64 1/22674816000000 (.f64 x-scale (.f64 (pow.f64 angle 5) (.f64 b (.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8))))) (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (*.f64 (PI.f64) (sqrt.f64 8)))))))))
(fma.f64 -1/34992000 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)))) (fma.f64 -1/30855889612800000000 (.f64 x-scale (.f64 (pow.f64 angle 7) (.f64 (pow.f64 (PI.f64) 7) (.f64 b (sqrt.f64 8))))) (fma.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (.f64 b (*.f64 (pow.f64 (PI.f64) 5) (sqrt.f64 8))) x-scale))))))
(fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (.f64 (.f64 (pow.f64 (PI.f64) 3) (.f64 b (sqrt.f64 8))) x-scale)) (fma.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (.f64 (.f64 (pow.f64 (PI.f64) 7) (.f64 b (sqrt.f64 8))) x-scale)) (.f64 x-scale (+.f64 (.f64 1/180 (.f64 angle (.f64 b (.f64 (PI.f64) (sqrt.f64 8))))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (.f64 (pow.f64 (PI.f64) 5) (*.f64 b (sqrt.f64 8)))))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 1 1/3) (.f64 b (.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 1)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 1)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 1 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 2))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3/2) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 3/2))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(.f64 (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/6) (pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) 3) 1/6))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 1)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 3)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(pow.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) 1/3)
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2))
(fabs.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))
(log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))) 1))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))
(sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))
(-.f64 (exp.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 1)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 1 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 1/6))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6)))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (cbrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b)) (cbrt.f64 (sqrt.f64 8)))
(.f64 (cbrt.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (sqrt.f64 8)))
(.f64 (cbrt.f64 (sqrt.f64 8)) (cbrt.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3/2) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))) 3/2))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 1/6)) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (.f64 (pow.f64 1 1/6) (pow.f64 1 1/6)) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(.f64 (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6)) (.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1/6) (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1/6)))
(.f64 (.f64 (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6) (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6)) (.f64 (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6) (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))))) 1/6)))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6)) (cbrt.f64 (sqrt.f64 8)))
(.f64 (cbrt.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))) (cbrt.f64 (sqrt.f64 8)))
(.f64 (cbrt.f64 (sqrt.f64 8)) (cbrt.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 1)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 2/3)
(.f64 (.f64 (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6) (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6)) (.f64 (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) 1/6) (pow.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))))) 1/6)))
(.f64 (cbrt.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (cbrt.f64 (sqrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))))))))
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) 2)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3)
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))))
(sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))))
(sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))))
(log.f64 (exp.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(log.f64 (+.f64 1 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(expm1.f64 (log1p.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(exp.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(exp.f64 (.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))) 1))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1/3))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(log1p.f64 (expm1.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))
(cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)))) 1)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 1)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))) 2)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))) 3)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 3) 1/3)
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(sqrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 2))
(sqrt.f64 (pow.f64 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))))) 2))
(fabs.f64 (.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale)))
(fabs.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale))))
(log.f64 (pow.f64 (exp.f64 x-scale) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale)) 3))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(cbrt.f64 (.f64 (pow.f64 x-scale 3) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(cbrt.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3) (pow.f64 x-scale 3)))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale))) 1))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (*.f64 b (sqrt.f64 8)) x-scale))))
(.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle)))))
(.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (*.f64 b x-scale))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 (sqrt.f64 8) x-scale)))
(-.f64 (exp.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 1)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 8) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 1)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 1 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (.f64 (sqrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (*.f64 b (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (.f64 b b)) 2) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 (.f64 2 (cbrt.f64 (.f64 b b))) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (*.f64 b (sqrt.f64 8)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (.f64 2 (cbrt.f64 (*.f64 b b)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 2 (.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (*.f64 b (sqrt.f64 8))))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) (.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))) (.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))) 4))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2) (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) (*.f64 b (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) (sqrt.f64 8))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (sqrt.f64 8)) b)
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (sqrt.f64 (.f64 b (sqrt.f64 8)))) (sqrt.f64 (.f64 b (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (cbrt.f64 (.f64 b b)) 2)) (cbrt.f64 (*.f64 b (sqrt.f64 8))))
(.f64 (.f64 2 (cbrt.f64 (.f64 b b))) (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (cbrt.f64 (*.f64 b (sqrt.f64 8)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (.f64 2 (cbrt.f64 (*.f64 b b)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 2 (.f64 (cbrt.f64 (.f64 b b)) (cbrt.f64 (*.f64 b (sqrt.f64 8))))))
(.f64 (.f64 (.f64 b (sqrt.f64 8)) (sqrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (sqrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (.f64 b (sqrt.f64 8)) (pow.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))) 2)) (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6)) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/6))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))))) (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))) (.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))) 4))
(.f64 (.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (cbrt.f64 (*.f64 b (sqrt.f64 8))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 1) (sqrt.f64 8))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))
(.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 (pow.f64 8 1/4) (pow.f64 8 1/4)))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (pow.f64 8 1/2)))
(.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))
(.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 2 (cbrt.f64 (sqrt.f64 8))))
(.f64 b (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))
(.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (*.f64 1/180 (PI.f64)) angle))) 2))))
(.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))) (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2))))
(.f64 (.f64 (pow.f64 1 3/2) (pow.f64 1 3/2)) (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(.f64 (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2))) 3/4) (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2))) 3/4))
(pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) 3/2)
(pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2))) 3/2)
(.f64 (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3) 1/6) (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8))) 3) 1/6))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))
(sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) 2)))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle)))))
(log.f64 (pow.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8)) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 (sqrt.f64 8) (log.f64 (exp.f64 b))))
(.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8))))
(log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 3))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3) (pow.f64 (.f64 b (sqrt.f64 8)) 3)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(cbrt.f64 (.f64 (pow.f64 (.f64 b (sqrt.f64 8)) 3) (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 3)))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(exp.f64 (.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))) 1))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))
(log1p.f64 (expm1.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))
(.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))

localize102.0ms (0.1%)

Local Accuracy

Found 4 expressions with local accuracy:

New	Accuracy	Program
✓	85.7%	(.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))))))
✓	70.0%	(+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))))
	59.1%	(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
✓	58.7%	(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))

Compiler

Compiled 245 to 149 computations (39.2% saved)

series2.0ms (0%)

Counts

3 → 84

Calls

21 calls:

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

rewrite102.0ms (0.1%)

Algorithm

1×	batch-egg-rewrite

Rules

566×	`add-sqr-sqrt`
548×	`*-un-lft-identity`
546×	`pow1`
520×	`add-exp-log`
520×	`add-cbrt-cube`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	31	177
1	660	21
2	7624	21

Stop Event

1×	node limit

Counts

3 → 23

Calls

Call 1

Inputs

(sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64)))

(+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))

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

Outputs

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

((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>) ((sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) #f)))

((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>) ((sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 1/180 (*.f64 angle (PI.f64)))) 2) (*.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale))))))) #f)))

simplify53.0ms (0%)

Algorithm

1×	egg-herbie

Rules

1786×	`fma-def`
1184×	`associate-r`
1044×	`distribute-rgt-in`
1026×	`distribute-lft-in`
964×	`associate-l`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	80	905
1	175	899
2	620	895
3	3356	895

Stop Event

1×	node limit

Counts

107 → 45

Calls

Call 1

Inputs
(.f64 1/180 (.f64 angle (PI.f64)))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (.f64 1/180 (.f64 angle (PI.f64))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(+.f64 (.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3))) (+.f64 (.f64 1/180 (.f64 angle (PI.f64))) (+.f64 (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5))) (.f64 -1/30855889612800000000 (.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1)
(.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(.f64 1 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2) (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 2))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 2)))
(pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 1)
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 1/2)
(pow.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2)
(pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3)
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3) 1/3)
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(fabs.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 1))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
0
0

Outputs
(.f64 1/180 (.f64 angle (PI.f64)))
(.f64 (.f64 1/180 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 (*.f64 1/180 angle) (PI.f64)))
(fma.f64 1/180 (.f64 angle (PI.f64)) (.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) 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 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 -1/34992000 (.f64 (pow.f64 angle 3) (pow.f64 (PI.f64) 3)) (.f64 1/22674816000000 (.f64 (pow.f64 angle 5) (pow.f64 (PI.f64) 5)))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (fma.f64 (pow.f64 angle 3) (.f64 -1/34992000 (pow.f64 (PI.f64) 3)) (.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 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (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 -1/30855889612800000000 (*.f64 (pow.f64 angle 7) (pow.f64 (PI.f64) 7))))))
(fma.f64 1/180 (.f64 angle (PI.f64)) (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 (pow.f64 (PI.f64) 7) (*.f64 -1/30855889612800000000 (pow.f64 angle 7))))))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
(-.f64 (exp.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 1)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) 1)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 1 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (sqrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2) (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 2))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (pow.f64 (cbrt.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64)))) 2)))
(.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4))) (fabs.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))))))
(.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 4))))
(.f64 (cbrt.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) 4))))
(pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 1)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) 1/2)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (sqrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 2)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (cbrt.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) 3)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(pow.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3) 1/3)
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(sqrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(fabs.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (exp.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log.f64 (+.f64 1 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(cbrt.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 3))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(expm1.f64 (log1p.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(exp.f64 (.f64 (log.f64 (sin.f64 (.f64 angle (*.f64 (PI.f64) 1/180)))) 1))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
(log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180)))))
(sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))
(sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))
(sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))
0
0

eval358.0ms (0.3%)

Compiler: Compiled 11887 to 8581 computations (27.8% saved)

prune345.0ms (0.2%)

Pruning

122 alts after pruning (115 fresh and 7 done)

	Pruned	Kept	Total
New	367	38	405
Fresh	9	77	86
Picked	0	1	1
Done	0	6	6
Total	376	122	498

Accurracy

55.5%

Counts

498 → 122

Alt Table

Click to see full alt table

Status	Accuracy	Program
	6.1%	(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
	20.9%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale))) 1/4))
	24.8%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale) 1/4))
	20.4%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (*.f64 (/.f64 (sqrt.f64 2) y-scale) a) 1/4))
	15.2%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (pow.f64 (/.f64 a y-scale) 4)))) 1/4))
	12.3%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (log.f64 (exp.f64 (pow.f64 (/.f64 a y-scale) 2))))) 1/4))
	16.7%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 1 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
	20.7%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
	20.6%	(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
	6.7%	(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
	22.6%	(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
	9.9%	(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
	22.0%	(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
	26.9%	(.f64 (.f64 1/4 x-scale) (/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1))))
	26.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 a 4))) 2)) (cbrt.f64 (log1p.f64 (.f64 a 4)))) 1))
	12.9%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 a 4)))) (sqrt.f64 (log1p.f64 (.f64 a 4)))) 1))
	26.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 a 4))) 1))
	25.6%	(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4)))) 1))
	5.8%	(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))
	2.9%	(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1))
✓	36.7%	(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
✓	5.8%	(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4)))
	26.9%	(.f64 (.f64 1/4 x-scale) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
✓	22.0%	(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
	25.9%	(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
	22.6%	(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
	9.5%	(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
✓	22.1%	(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
	26.0%	(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))
	22.7%	(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
	9.6%	(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
	4.2%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
	15.6%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-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 1 (*.f64 y-scale y-scale)))))
	5.7%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 y-scale y-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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 x-scale x-scale))))
	4.1%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
	1.8%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 1 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.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 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))
	1.9%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2)))))))
	19.9%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
	10.1%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) -1/2))))
	1.8%	(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))))))))
	13.5%	(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
	6.8%	(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))))) (.f64 -1/4 (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
	23.2%	(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
	25.9%	(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
	4.0%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 1 (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))
	3.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))))))
	4.4%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
	6.1%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))))))
	15.6%	(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	20.9%	(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
	2.5%	(.f64 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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)))))))))
	7.6%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
	5.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
	9.8%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
	12.1%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) 2) (.f64 y-scale y-scale)))))))
✓	11.7%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
	12.0%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (*.f64 y-scale y-scale)))))))
	10.5%	(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
	25.9%	(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
	22.0%	(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
	4.2%	(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 1 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
	1.8%	(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
	5.5%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
	17.4%	(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
	15.6%	(.f64 -1/4 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 1))
	17.5%	(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 3))
	15.4%	(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
	15.6%	(.f64 -1/4 (.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b x-scale)))
	23.2%	(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
	15.6%	(.f64 -1/4 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) x-scale))))
	23.3%	(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)))
	12.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3) 3)))
	12.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 2/3) 3)))
	17.5%	(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3) 3)))
	12.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6)) (cbrt.f64 (sqrt.f64 8))) 3)))
	17.5%	(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b)) (cbrt.f64 (sqrt.f64 8))) 3)))
	17.5%	(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 3)))
	22.0%	(.f64 -1/4 (.f64 x-scale (pow.f64 (sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3)))
	26.3%	(.f64 -1/4 (.f64 x-scale (pow.f64 (log.f64 (exp.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 3)))
	12.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (exp.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 3)))
	12.4%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 b (sqrt.f64 8)))) 3)))
	19.2%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)) (.f64 b (sqrt.f64 8)))) 3)))
✓	17.6%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)))
	17.4%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (fabs.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (sqrt.f64 8)))) 3)))
	10.4%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (.f64 b (sqrt.f64 8)))) 3)))
	22.0%	(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) 3/2)))
	22.0%	(.f64 -1/4 (.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (.f64 1/180 angle) (PI.f64))) (sqrt.f64 8))))
	20.0%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 8))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
	12.1%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3))) (sqrt.f64 8))))
	17.7%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3))) (sqrt.f64 8))))
	17.6%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 2 (cbrt.f64 (sqrt.f64 8))))))
	14.1%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
	10.6%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
	14.4%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)))) (sqrt.f64 8))))
	17.5%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
	23.6%	(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
	17.6%	(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))))
	24.0%	(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8))))))
	22.0%	(.f64 -1/4 (.f64 x-scale (.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))) 4))))
	17.6%	(.f64 -1/4 (.f64 x-scale (.f64 b (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (.f64 angle (.f64 1/180 (PI.f64))) (sqrt.f64 8)))))
✓	17.6%	(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
	10.0%	(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
	19.2%	(.f64 -1/4 (.f64 x-scale (.f64 b (sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
	10.0%	(.f64 -1/4 (.f64 x-scale (.f64 b (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))))
	12.4%	(.f64 -1/4 (.f64 x-scale (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
	26.5%	(.f64 -1/4 (.f64 x-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))))
	12.6%	(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
	24.8%	(.f64 -1/4 (.f64 x-scale (cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))))
	17.5%	(.f64 -1/4 (.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
	12.4%	(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))))))
	12.4%	(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
	25.3%	(fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
	25.3%	(fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))

Compiler

Compiled 4668 to 3493 computations (25.2% saved)

regimes3.2s (2.2%)

Counts

166 → 7

Calls

Call 1

Inputs
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))
(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 (.f64 a a) 16)))
(.f64 (.f64 1/4 x-scale) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
(.f64 (.f64 1/4 x-scale) (/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1))))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4)))) 1))
(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (expm1.f64 (log1p.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (cbrt.f64 (pow.f64 (*.f64 a 4) 3)))
(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (.f64 angle (.f64 1/180 (PI.f64))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (.f64 1/180 angle) (PI.f64))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (*.f64 (/.f64 (sqrt.f64 2) y-scale) a) 1/4))
(.f64 (.f64 1/4 x-scale) (log.f64 (pow.f64 (exp.f64 a) 4)))
(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4)))
(.f64 -1/4 (.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(.f64 -1/4 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) x-scale))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b x-scale)))
(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 1 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
(.f64 -1/4 (.f64 x-scale (sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 1))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 2 (cbrt.f64 (sqrt.f64 8))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale))) 1/4))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (/.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 b (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 3))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 3))
(.f64 -1/4 (.f64 x-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) 3/2)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)))
(.f64 -1/4 (.f64 x-scale (cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (/.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) y-scale) 1/4))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 -1/4 (.f64 y-scale (.f64 (*.f64 (sqrt.f64 8) a) x-scale))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 8) (*.f64 y-scale a))))
(.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) a)))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 (.f64 y-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 1 (*.f64 y-scale y-scale)))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (neg.f64 (/.f64 b (/.f64 (*.f64 x-scale x-scale) b)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64)))) (log.f64 (pow.f64 (exp.f64 b) (sqrt.f64 8))))))
(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (sqrt.f64 (log1p.f64 (.f64 a 4)))) (sqrt.f64 (log1p.f64 (.f64 a 4)))) 1))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (fabs.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (cbrt.f64 (.f64 b (sqrt.f64 8))) (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b)) (cbrt.f64 (sqrt.f64 8))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (sqrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (sqrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))) 2/3) 3)))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (exp.f64 (log.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (expm1.f64 (log1p.f64 (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 1/180 angle))) (/.f64 a y-scale)) (/.f64 a y-scale)))) 1/4))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 1 (.f64 y-scale y-scale)))) (.f64 (/.f64 (.f64 a a) x-scale) (/.f64 (.f64 (sqrt.f64 8) b) y-scale)))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (exp.f64 (log.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (exp.f64 (log.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (log.f64 (exp.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))) 3)))
(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (exp.f64 (pow.f64 (cbrt.f64 (log1p.f64 (.f64 a 4))) 2)) (cbrt.f64 (log1p.f64 (.f64 a 4)))) 1))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 2)) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))))) 3) 3)))
(.f64 -1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (pow.f64 a 2) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (sqrt.f64 (pow.f64 (/.f64 a y-scale) 4)))) 1/4))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (*.f64 -1 (/.f64 (pow.f64 b 2) (pow.f64 x-scale 2)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (.f64 angle (.f64 (PI.f64) 1/180)) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (cbrt.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64)))) (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))) (sqrt.f64 8))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (log.f64 (exp.f64 (pow.f64 (/.f64 a y-scale) 2))))) 1/4))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 y-scale y-scale)))))))
(.f64 1/4 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a))))))))))
(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 (.f64 b b) (.f64 y-scale y-scale)) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2)) (/.f64 a (.f64 y-scale (/.f64 y-scale a)))))) (.f64 -1/4 (.f64 y-scale (.f64 x-scale (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (.f64 (.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6) (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 1/6)) (cbrt.f64 (sqrt.f64 8))) 3)))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (.f64 b (neg.f64 a)))))
(.f64 -1/4 (.f64 x-scale (.f64 (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) b) 2)))) 3) (cbrt.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (*.f64 b (sqrt.f64 8)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))))) 2) (*.f64 y-scale y-scale)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (cbrt.f64 (cbrt.f64 (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))))))) (pow.f64 (cbrt.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 angle (*.f64 1/180 (PI.f64))))) 2)))) 4))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale)))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (neg.f64 (/.f64 (pow.f64 (.f64 (cbrt.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 (cbrt.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4)))) 2) (.f64 y-scale y-scale)))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) 2) (pow.f64 (cos.f64 (.f64 (*.f64 1/180 angle) (PI.f64))) 2)))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 y-scale y-scale)) (.f64 (/.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 2)) -1/2))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (.f64 -1/2 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2) (pow.f64 (cos.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 -1/2 (/.f64 (.f64 y-scale y-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 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2))))) (.f64 x-scale x-scale))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (.f64 (.f64 angle angle) (+.f64 (fma.f64 1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (.f64 -1/32400 (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 (.f64 -1/2 (.f64 y-scale y-scale)) (fma.f64 -2 (/.f64 (.f64 1/32400 (+.f64 (/.f64 (pow.f64 (PI.f64) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (PI.f64) 2) (.f64 y-scale y-scale)))) (.f64 y-scale y-scale)) (/.f64 1/8100 (/.f64 (.f64 x-scale x-scale) (/.f64 (pow.f64 (PI.f64) 2) (*.f64 y-scale y-scale))))))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (/.f64 (-.f64 (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (.f64 x-scale x-scale)))))) (*.f64 b (neg.f64 a)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (neg.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))))))))) (.f64 b (neg.f64 a)))))
(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 (.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 (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 1/180 angle))) 2) (.f64 b b)) 2)))))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 1 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 -1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (.f64 y-scale (.f64 a (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) 2))))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-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 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale (.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 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 x-scale (.f64 (.f64 y-scale b) (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (.f64 a (sqrt.f64 8)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale))) 2))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 -1/2 (/.f64 (fma.f64 -2 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 x-scale x-scale)) (.f64 4 (/.f64 (pow.f64 b 4) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 b b))))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (sqrt.f64 (fma.f64 4 (.f64 (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 angle (.f64 (PI.f64) 1/180))) 2) (.f64 y-scale y-scale))) 2)))) (.f64 b b))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 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 (/.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 x-scale x-scale)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 y-scale y-scale))))))))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-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))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (*.f64 x-scale x-scale)))))))))))
(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)) (*.f64 x-scale x-scale))))))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (+.f64 1 (.f64 -1/64800 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) 2)))) 2))) (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (.f64 4 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (/.f64 (.f64 (pow.f64 b 4) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 x-scale x-scale)))))))))))
(.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (sqrt.f64 (fma.f64 4 (/.f64 (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 y-scale y-scale)) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))))) 2) (.f64 y-scale y-scale))) 2))))))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (log.f64 (exp.f64 (-.f64 (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 b b) (.f64 y-scale y-scale)))) 2) (.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 y-scale y-scale)) (.f64 (.f64 (/.f64 (pow.f64 b 4) x-scale) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (*.f64 angle (PI.f64)))) 2) x-scale)) 4)))))))))))
(.f64 (.f64 -1/4 (.f64 x-scale (.f64 y-scale (.f64 a (sqrt.f64 8))))) (sqrt.f64 (+.f64 (fma.f64 -1/2 (.f64 (/.f64 (.f64 y-scale y-scale) (pow.f64 x-scale 4)) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 4) (pow.f64 (.f64 1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (/.f64 (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 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 x-scale x-scale))) (.f64 -1/2 (/.f64 (.f64 y-scale y-scale) (/.f64 (.f64 (.f64 x-scale x-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 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) 2)))))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (/.f64 (sqrt.f64 (.f64 b (.f64 (.f64 a (.f64 a (.f64 (/.f64 (.f64 -8 (.f64 b (.f64 a (.f64 b a)))) (pow.f64 (.f64 x-scale y-scale) 2)) (neg.f64 b)))) (+.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (hypot.f64 (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 x-scale x-scale)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2) (pow.f64 (.f64 b (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))) 2)) (.f64 y-scale y-scale))) (.f64 (/.f64 (-.f64 (.f64 b b) (.f64 a a)) (/.f64 x-scale (.f64 2 (sin.f64 (/.f64 angle (/.f64 180 (PI.f64))))))) (/.f64 (cos.f64 (/.f64 angle (/.f64 180 (PI.f64)))) y-scale)))))))) (*.f64 b (neg.f64 a)))))
(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 1 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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(.f64 1/4 (.f64 x-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(.f64 1/4 (.f64 y-scale (.f64 (sqrt.f64 8) (sqrt.f64 (-.f64 (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))) (.f64 1/2 (/.f64 (fma.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))))))))))
(.f64 (.f64 1/4 (.f64 x-scale (sqrt.f64 8))) (sqrt.f64 (+.f64 (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))) (.f64 -1/2 (/.f64 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a)))))) (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))))))))
(.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (*.f64 a a)))))))))))
(.f64 (.f64 1/4 (.f64 (.f64 x-scale y-scale) (sqrt.f64 8))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (/.f64 (.f64 x-scale x-scale) (.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)))) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 x-scale x-scale) (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (*.f64 a a)))))))
(/.f64 (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 1/4 (.f64 (.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)) (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (.f64 1/2 (/.f64 (+.f64 (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 b 2) (pow.f64 a 2)) 2) (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 1/4 (.f64 (.f64 y-scale (sqrt.f64 8)) (sqrt.f64 (-.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/2 (/.f64 (+.f64 (.f64 -2 (.f64 (+.f64 (.f64 (pow.f64 b 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (.f64 (pow.f64 a 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (+.f64 (/.f64 (.f64 (pow.f64 b 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2)) (/.f64 (.f64 (pow.f64 a 2) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 y-scale 2))))) (.f64 4 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (-.f64 (pow.f64 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)))))))))
(fma.f64 -1/16 (.f64 (/.f64 (.f64 (pow.f64 x-scale 3) (.f64 y-scale (.f64 (-.f64 (pow.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) 2) (pow.f64 (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) 2)) (sqrt.f64 8)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (sqrt.f64 (/.f64 1 (-.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (/.f64 (.f64 1/2 (fma.f64 4 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2)) (.f64 y-scale y-scale)) (.f64 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))))))) (.f64 1/4 (.f64 y-scale (.f64 (.f64 x-scale (sqrt.f64 8)) (sqrt.f64 (+.f64 (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (-.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 -2 (.f64 (+.f64 (/.f64 (.f64 b b) (/.f64 (.f64 y-scale y-scale) (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2))) (/.f64 (.f64 a a) (/.f64 (.f64 y-scale y-scale) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a)))) (/.f64 (.f64 4 (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2)) (/.f64 (.f64 y-scale y-scale) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (pow.f64 (-.f64 (.f64 b b) (.f64 a a)) 2))))) (fma.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) 2) (.f64 a a))))))))))))

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

Calls

8 calls:

780.0ms	x-scale
758.0ms	(*.f64 (/.f64 angle 180) (PI.f64))
393.0ms	angle
345.0ms	(/.f64 angle 180)
321.0ms	y-scale

Results

Accuracy	Segments	Branch
36.7%	1	`a`
39.1%	2	`b`
40.3%	3	`angle`
42.6%	7	`x-scale`
42.5%	3	`y-scale`
36.7%	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)))
40.3%	3	`(*.f64 (/.f64 angle 180) (PI.f64))`
40.3%	3	`(/.f64 angle 180)`

Compiler

Compiled 7547 to 4719 computations (37.5% saved)

bsearch7.9s (5.5%)

Algorithm

6×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.5s	4.9786706869385085e+97	9.535052033078405e+107
1.2s	3.9290293596140704e-25	1.2282023677817653e-20
1.6s	1.198982735135041e-42	5.3466231196548856e-27
1.1s	4.7792811660468573e-135	9.062750523571811e-133
1.2s	-1.854286475915247e-117	-8.796425145911857e-119
1.3s	-6.3296824921742034e-24	-3.0022524093310103e-30

Results

4.2s	404×	body	4096	valid
2.2s	101×	body	8192	valid
1.1s	197×	body	2048	valid
352.0ms	73×	body	1024	valid
65.0ms	27×	body	512	valid
15.0ms	14×	body	256	valid
5.0ms	2×	body	512	infinite

Compiler

Compiled 2615 to 2029 computations (22.4% saved)

regimes937.0ms (0.7%)

Counts

125 → 3

Calls

Call 1

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

Outputs

(*.f64 (*.f64 1/4 x-scale) (-.f64 1 1))

(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 (sqrt.f64 8) (*.f64 y-scale x-scale)) (hypot.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))

(*.f64 (*.f64 1/4 x-scale) (*.f64 a 4))

Calls

5 calls:

263.0ms	x-scale
229.0ms	angle
171.0ms	y-scale
120.0ms	b
62.0ms	a

Results

Accuracy	Segments	Branch
36.7%	1	`a`
39.1%	2	`b`
40.3%	3	`angle`
41.1%	4	`x-scale`
42.5%	3	`y-scale`

Compiler

Compiled 2586 to 1802 computations (30.3% saved)

bsearch2.4s (1.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0s	1.374360450844057e+112	5.749361730156754e+113
1.4s	2.7630264860677776e-68	3.642103248211523e-57

Results

1.2s	130×	body	4096	valid
748.0ms	38×	body	8192	valid
309.0ms	58×	body	2048	valid
92.0ms	27×	body	1024	valid
24.0ms	10×	body	512	valid
16.0ms	9×	body	256	valid
6.0ms	1×	body	2048	infinite

Compiler

Compiled 927 to 702 computations (24.3% saved)

regimes625.0ms (0.4%)

Counts

85 → 3

Calls

Call 1

Inputs
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))
(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 (.f64 a a) 16)))
(.f64 (.f64 1/4 x-scale) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
(.f64 (.f64 1/4 x-scale) (/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1))))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4)))) 1))
(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (expm1.f64 (log1p.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (cbrt.f64 (pow.f64 (*.f64 a 4) 3)))
(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (.f64 angle (.f64 1/180 (PI.f64))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (.f64 1/180 angle) (PI.f64))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (*.f64 (/.f64 (sqrt.f64 2) y-scale) a) 1/4))
(.f64 (.f64 1/4 x-scale) (log.f64 (pow.f64 (exp.f64 a) 4)))
(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4)))
(.f64 -1/4 (.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(.f64 -1/4 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) x-scale))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b x-scale)))
(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 1 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
(.f64 -1/4 (.f64 x-scale (sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 1))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 2 (cbrt.f64 (sqrt.f64 8))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale))) 1/4))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (/.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 b (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 3))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 3))
(.f64 -1/4 (.f64 x-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) 3/2)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)))
(.f64 -1/4 (.f64 x-scale (cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))
(fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))

Outputs

(*.f64 (*.f64 1/4 x-scale) (-.f64 1 1))

(fabs.f64 (*.f64 1/4 (*.f64 (*.f64 y-scale (*.f64 x-scale (sqrt.f64 8))) (hypot.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale)))))

(*.f64 (*.f64 1/4 x-scale) (*.f64 a 4))

Calls

5 calls:

183.0ms	x-scale
152.0ms	angle
112.0ms	y-scale
86.0ms	b
43.0ms	a

Results

Accuracy	Segments	Branch
36.7%	1	`a`
39.1%	2	`b`
40.3%	3	`angle`
41.0%	4	`x-scale`
42.4%	3	`y-scale`

Compiler

Compiled 1401 to 1036 computations (26.1% saved)

bsearch2.4s (1.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
988.0ms	1.374360450844057e+112	5.749361730156754e+113
1.4s	2.7630264860677776e-68	3.642103248211523e-57

Results

1.2s	129×	body	4096	valid
679.0ms	35×	body	8192	valid
421.0ms	67×	body	2048	valid
79.0ms	25×	body	1024	valid
12.0ms	11×	body	256	valid
9.0ms	5×	body	512	valid
6.0ms	1×	body	2048	infinite
1.0ms	1×	body	256	infinite

Compiler

Compiled 927 to 702 computations (24.3% saved)

regimes518.0ms (0.4%)

Counts

84 → 3

Calls

Call 1

Inputs
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))
(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))
(.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 (.f64 a a) 16)))
(.f64 (.f64 1/4 x-scale) (.f64 (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1) (/.f64 1 (+.f64 (+.f64 (*.f64 a 4) 1) 1))))
(.f64 (.f64 1/4 x-scale) (/.f64 1 (/.f64 (+.f64 (+.f64 (.f64 a 4) 1) 1) (+.f64 (pow.f64 (+.f64 (.f64 a 4) 1) 2) -1))))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 (+.f64 1 (pow.f64 (.f64 a 4) 3)) (+.f64 1 (-.f64 (.f64 16 (.f64 a a)) (.f64 a 4)))) 1))
(.f64 (.f64 1/4 x-scale) (exp.f64 (log.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (expm1.f64 (log1p.f64 (*.f64 a 4))))
(.f64 (.f64 1/4 x-scale) (cbrt.f64 (pow.f64 (*.f64 a 4) 3)))
(.f64 (.f64 1/4 x-scale) (pow.f64 (cbrt.f64 (*.f64 a 4)) 3))
(.f64 (.f64 1/4 x-scale) (pow.f64 (*.f64 (sqrt.f64 a) 2) 2))
(.f64 1/4 (.f64 (.f64 x-scale (sqrt.f64 2)) (.f64 a (sqrt.f64 8))))
(.f64 (.f64 1/4 x-scale) (.f64 (.f64 a (sqrt.f64 8)) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (pow.f64 (pow.f64 (*.f64 a 4) 3) 1/3))
(.f64 (.f64 1/4 x-scale) (.f64 (sqrt.f64 (.f64 a (*.f64 a 8))) (sqrt.f64 2)))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 b (.f64 (sqrt.f64 8) (PI.f64)))))))
(.f64 -1/4 (.f64 1/180 (.f64 x-scale (.f64 angle (.f64 (PI.f64) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 1/180 (.f64 b (.f64 (.f64 (PI.f64) (sqrt.f64 8)) angle)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (.f64 angle (.f64 1/180 (PI.f64))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 angle (.f64 (PI.f64) 1/180))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (.f64 (.f64 1/180 angle) (PI.f64))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (sqrt.f64 8) (.f64 (PI.f64) b)) (.f64 1/180 angle))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (*.f64 (/.f64 (sqrt.f64 2) y-scale) a) 1/4))
(.f64 (.f64 1/4 x-scale) (log.f64 (pow.f64 (exp.f64 a) 4)))
(.f64 (.f64 1/4 x-scale) (.f64 (fabs.f64 (.f64 a (sqrt.f64 8))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (-.f64 (pow.f64 (E.f64) (log1p.f64 (*.f64 a 4))) 1))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 a) 2) (.f64 (cbrt.f64 a) 4)))
(.f64 -1/4 (.f64 b (.f64 (sqrt.f64 8) (.f64 x-scale (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64)))) (.f64 b (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))))))
(.f64 -1/4 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (.f64 (sqrt.f64 8) x-scale))))
(.f64 -1/4 (.f64 (.f64 (sqrt.f64 8) (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))) (.f64 b x-scale)))
(.f64 -1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))))
(.f64 1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (sqrt.f64 8))))
(.f64 1/4 (.f64 (.f64 (.f64 x-scale b) (sqrt.f64 8)) (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle)))))
(.f64 (.f64 1/4 x-scale) (-.f64 (exp.f64 (+.f64 (*.f64 -1 (log.f64 (/.f64 1 a))) (log.f64 4))) 1))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 a (.f64 y-scale (/.f64 y-scale a))) (pow.f64 1 2)) (/.f64 a (*.f64 y-scale (/.f64 y-scale a))))) 1/4))
(.f64 (.f64 1/4 x-scale) (.f64 (exp.f64 (log.f64 (.f64 a (sqrt.f64 8)))) (sqrt.f64 2)))
(.f64 (.f64 1/4 x-scale) (.f64 (pow.f64 (cbrt.f64 (.f64 a (sqrt.f64 8))) 3) (sqrt.f64 2)))
(.f64 -1/4 (.f64 x-scale (sqrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2)))))
(.f64 -1/4 (.f64 x-scale (.f64 b (sqrt.f64 (.f64 8 (pow.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) 2))))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (.f64 angle (PI.f64))) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 (.f64 b (sqrt.f64 8)) x-scale)) 1))
(.f64 -1/4 (.f64 x-scale (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (.f64 b (*.f64 2 (cbrt.f64 (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) (*.f64 2 (cbrt.f64 (sqrt.f64 8))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) 2) (cbrt.f64 (sqrt.f64 8)))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 (.f64 (sin.f64 (.f64 1/180 (*.f64 (PI.f64) angle))) b) (pow.f64 8 1/4)) (pow.f64 8 1/4))))
(.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))
(.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (.f64 (hypot.f64 (/.f64 a y-scale) (.f64 (cos.f64 (.f64 (PI.f64) (*.f64 angle 1/180))) (/.f64 a y-scale))) 1/4))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (/.f64 (.f64 (.f64 (.f64 b b) (sqrt.f64 8)) (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))) (*.f64 y-scale y-scale)))))
(.f64 (pow.f64 (.f64 x-scale y-scale) 2) (.f64 (/.f64 -1/4 (.f64 b a)) (.f64 (/.f64 a x-scale) (neg.f64 (/.f64 (.f64 (sin.f64 (.f64 (PI.f64) (.f64 1/180 angle))) (.f64 (sqrt.f64 8) (.f64 b b))) (*.f64 y-scale y-scale))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (expm1.f64 (log1p.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (exp.f64 (log.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8)))))))
(.f64 -1/4 (.f64 x-scale (.f64 b (.f64 (sqrt.f64 8) (exp.f64 (log.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64))))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log.f64 (exp.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (log1p.f64 (expm1.f64 (sin.f64 (.f64 1/180 (.f64 angle (PI.f64))))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (exp.f64 (log.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (expm1.f64 (log1p.f64 (.f64 (.f64 1/180 (PI.f64)) angle))))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 b (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) (sqrt.f64 8))) 3))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (cbrt.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3)))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (cbrt.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) 3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sqrt.f64 (pow.f64 (sin.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8)))) 3)))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 x-scale (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))) 3))
(.f64 -1/4 (pow.f64 (cbrt.f64 (.f64 (.f64 b (sqrt.f64 8)) (.f64 (sin.f64 (.f64 angle (.f64 1/180 (PI.f64)))) x-scale))) 3))
(.f64 -1/4 (.f64 x-scale (log.f64 (+.f64 1 (expm1.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))))))))
(.f64 -1/4 (.f64 x-scale (.f64 (.f64 b (sin.f64 (pow.f64 (pow.f64 (.f64 (.f64 1/180 (PI.f64)) angle) 3) 1/3))) (sqrt.f64 8))))
(.f64 -1/4 (.f64 x-scale (pow.f64 (cbrt.f64 (.f64 8 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 2))) 3/2)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) (.f64 b (sqrt.f64 8))) 1/3) 3)))
(.f64 -1/4 (.f64 x-scale (pow.f64 (pow.f64 (.f64 (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle)) (.f64 b (sqrt.f64 8))) 3) 1/3)))
(.f64 -1/4 (.f64 x-scale (cbrt.f64 (.f64 (pow.f64 (.f64 b (sin.f64 (.f64 (.f64 1/180 (PI.f64)) angle))) 3) (*.f64 8 (sqrt.f64 8))))))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 1/4 x-scale) (sqrt.f64 8)))
(.f64 (sqrt.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) 1) (.f64 a a))) (.f64 (*.f64 x-scale (sqrt.f64 8)) -1/4))

Outputs
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (fabs.f64 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))

Calls

5 calls:

163.0ms	angle
112.0ms	x-scale
83.0ms	y-scale
73.0ms	b
41.0ms	a

Results

Accuracy	Segments	Branch
36.7%	1	`a`
38.3%	2	`b`
40.3%	3	`angle`
38.5%	2	`x-scale`
40.3%	2	`y-scale`

Compiler

Compiled 1377 to 1022 computations (25.8% saved)

bsearch1.5s (1.1%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
675.0ms	1.1119590805720417e-34	1.3402912855360055e-33
863.0ms	-1.5295187219044487e-225	-5.6898998587807065e-229

Results

636.0ms	82×	body	4096	valid
463.0ms	31×	body	8192	valid
310.0ms	60×	body	2048	valid
64.0ms	21×	body	1024	valid
44.0ms	19×	body	512	valid
16.0ms	11×	body	256	valid
1.0ms	1×	body	256	infinite

Compiler

Compiled 574 to 467 computations (18.6% saved)

regimes45.0ms (0%)

Accuracy

Total -23.9b remaining (-62.6%)

Threshold costs -23.9b (-62.6%)

Counts

4 → 2

Calls

Call 1

Inputs
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (+.f64 -1 (*.f64 4 a)))
(.f64 (.f64 1/4 x-scale) (-.f64 (/.f64 -4 (/.f64 -1 a)) 1))

Outputs
(.f64 (.f64 1/4 x-scale) (-.f64 1 1))
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
36.7%	1	`a`
36.7%	1	`b`
39.1%	3	`angle`
36.7%	1	`x-scale`
40.2%	2	`y-scale`

Compiler

Compiled 69 to 57 computations (17.4% saved)

bsearch1.2s (0.8%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.2s	7.066737793876766e-29	1.2303609240978078e-19

Results

743.0ms	77×	body	4096	valid
246.0ms	13×	body	8192	valid
151.0ms	28×	body	2048	valid
43.0ms	13×	body	1024	valid
21.0ms	9×	body	512	valid
4.0ms	4×	body	256	valid

Compiler

Compiled 430 to 338 computations (21.4% saved)

simplify25.0ms (0%)

Algorithm

1×	egg-herbie

Rules

68×	`*-commutative`
30×	`fabs-mul`
8×	`+-commutative`
6×	`sub-neg`
4×	`neg-mul-1`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	117	750
1	163	750
2	180	750
3	192	750
4	200	750
5	201	750

Stop Event

1×	fuel
1×	saturated

Calls

Call 1

Inputs
(if (<=.f64 x-scale -7493050386706289/356811923176489970264571492362373784095686656) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 x-scale -4997016229532297/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416) (fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (if (<=.f64 x-scale 7672009237256583/102293456496754433437912178025862473506770063938845774671352855253004181137646079840102190385184504910965208878986252219038039267058918532916516487168) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 x-scale 7247742189522453/1393796574908163946345982392040522594123776) (.f64 (.f64 1/4 x-scale) (fabs.f64 (.f64 4 a))) (if (<=.f64 x-scale 8711228593176025/21778071482940061661655974875633165533184) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))))) (if (<=.f64 x-scale 950000000000000019262011878811972413078723577907232914598361459633989504065741915760064217076341854051500032) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))))))))
(if (<=.f64 y-scale 1236792945344869/1766847064778384329583297500742918515827483896875618958121606201292619776) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 y-scale 359999999999999991931072776714238961408413583406448582555808465872522433558245763113188495373317561016476904718336) (fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 a 4))))
(if (<=.f64 y-scale 3250998599192227/28269553036454149273332760011886696253239742350009903329945699220681916416) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 y-scale 200000000000000003111883225893368604853640279384212286673954116086166756232951140652997077983009489535241256173568) (fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 a 4))))
(if (<=.f64 angle -8001617319455825/26672057731519417096319407162885031188579033289263632641585031247056148951270528286085728803486217162971719642373732961783555206616477460321453424209323320184380630318056058233852313143647256098915860064543546407926762992149905845164655509504) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 angle 2455322750715917/11692013098647223345629478661730264157247460343808) (.f64 (.f64 1/4 x-scale) (fabs.f64 (.f64 4 a))) (.f64 (*.f64 1/4 x-scale) (-.f64 1 1))))
(if (<=.f64 y-scale 5316911983139663/10633823966279326983230456482242756608) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (.f64 (.f64 1/4 x-scale) (*.f64 a 4)))
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))

Outputs
(if (<=.f64 x-scale -7493050386706289/356811923176489970264571492362373784095686656) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 x-scale -4997016229532297/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416) (fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (if (<=.f64 x-scale 7672009237256583/102293456496754433437912178025862473506770063938845774671352855253004181137646079840102190385184504910965208878986252219038039267058918532916516487168) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 x-scale 7247742189522453/1393796574908163946345982392040522594123776) (.f64 (.f64 1/4 x-scale) (fabs.f64 (.f64 4 a))) (if (<=.f64 x-scale 8711228593176025/21778071482940061661655974875633165533184) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 b (sqrt.f64 8)))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.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 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (.f64 1/180 angle) (PI.f64))) 2) (.f64 x-scale x-scale))))))) (if (<=.f64 x-scale 950000000000000019262011878811972413078723577907232914598361459633989504065741915760064217076341854051500032) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (.f64 (.f64 1/4 x-scale) (sqrt.f64 (.f64 a (.f64 a 16))))))))))
(if (<=.f64 x-scale -7493050386706289/356811923176489970264571492362373784095686656) (.f64 (.f64 x-scale 1/4) 0) (if (<=.f64 x-scale -4997016229532297/45427420268475430659332737993000283397102585042957378767593137448789955507087370207886940669610222847547657600391636120845912601788416) (.f64 1/4 (fabs.f64 (.f64 (.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (if (<=.f64 x-scale 7672009237256583/102293456496754433437912178025862473506770063938845774671352855253004181137646079840102190385184504910965208878986252219038039267058918532916516487168) (.f64 (.f64 x-scale 1/4) 0) (if (<=.f64 x-scale 7247742189522453/1393796574908163946345982392040522594123776) (.f64 (.f64 x-scale 1/4) (fabs.f64 (.f64 a 4))) (if (<=.f64 x-scale 8711228593176025/21778071482940061661655974875633165533184) (.f64 1/4 (.f64 (.f64 x-scale (.f64 y-scale (.f64 (sqrt.f64 8) b))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 (sin.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 1/180 (.f64 (PI.f64) angle))) 2) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) 2) (.f64 x-scale x-scale))))))) (if (<=.f64 x-scale 950000000000000019262011878811972413078723577907232914598361459633989504065741915760064217076341854051500032) (.f64 (.f64 x-scale 1/4) 0) (.f64 (.f64 x-scale 1/4) (sqrt.f64 (.f64 a (.f64 a 16))))))))))
(if (<=.f64 y-scale 1236792945344869/1766847064778384329583297500742918515827483896875618958121606201292619776) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 y-scale 359999999999999991931072776714238961408413583406448582555808465872522433558245763113188495373317561016476904718336) (fabs.f64 (.f64 1/4 (.f64 (.f64 (sqrt.f64 8) (.f64 y-scale x-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 a 4))))
(if (<=.f64 y-scale 1236792945344869/1766847064778384329583297500742918515827483896875618958121606201292619776) (.f64 (.f64 x-scale 1/4) 0) (if (<=.f64 y-scale 359999999999999991931072776714238961408413583406448582555808465872522433558245763113188495373317561016476904718336) (.f64 1/4 (fabs.f64 (.f64 (.f64 (sqrt.f64 8) (.f64 x-scale y-scale)) (hypot.f64 (.f64 (cos.f64 (.f64 (PI.f64) (.f64 angle 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (.f64 (.f64 x-scale 1/4) (.f64 a 4))))
(if (<=.f64 y-scale 3250998599192227/28269553036454149273332760011886696253239742350009903329945699220681916416) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 y-scale 200000000000000003111883225893368604853640279384212286673954116086166756232951140652997077983009489535241256173568) (fabs.f64 (.f64 1/4 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180))) (/.f64 a y-scale)) (/.f64 a y-scale))))) (.f64 (.f64 1/4 x-scale) (.f64 a 4))))
(if (<=.f64 y-scale 3250998599192227/28269553036454149273332760011886696253239742350009903329945699220681916416) (.f64 (.f64 x-scale 1/4) 0) (if (<=.f64 y-scale 200000000000000003111883225893368604853640279384212286673954116086166756232951140652997077983009489535241256173568) (.f64 1/4 (fabs.f64 (.f64 (.f64 y-scale (.f64 x-scale (sqrt.f64 8))) (hypot.f64 (.f64 (/.f64 a y-scale) (cos.f64 (.f64 angle (.f64 (PI.f64) 1/180)))) (/.f64 a y-scale))))) (.f64 (.f64 x-scale 1/4) (.f64 a 4))))
(if (<=.f64 angle -8001617319455825/26672057731519417096319407162885031188579033289263632641585031247056148951270528286085728803486217162971719642373732961783555206616477460321453424209323320184380630318056058233852313143647256098915860064543546407926762992149905845164655509504) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (if (<=.f64 angle 2455322750715917/11692013098647223345629478661730264157247460343808) (.f64 (.f64 1/4 x-scale) (fabs.f64 (.f64 4 a))) (.f64 (*.f64 1/4 x-scale) (-.f64 1 1))))
(if (or (<=.f64 angle -8001617319455825/26672057731519417096319407162885031188579033289263632641585031247056148951270528286085728803486217162971719642373732961783555206616477460321453424209323320184380630318056058233852313143647256098915860064543546407926762992149905845164655509504) (not (<=.f64 angle 2455322750715917/11692013098647223345629478661730264157247460343808))) (.f64 (.f64 x-scale 1/4) 0) (.f64 (.f64 x-scale 1/4) (fabs.f64 (*.f64 a 4))))
(if (<=.f64 y-scale 5316911983139663/10633823966279326983230456482242756608) (.f64 (.f64 1/4 x-scale) (-.f64 1 1)) (.f64 (.f64 1/4 x-scale) (*.f64 a 4)))
(if (<=.f64 y-scale 5316911983139663/10633823966279326983230456482242756608) (.f64 (.f64 x-scale 1/4) 0) (.f64 (.f64 x-scale 1/4) (*.f64 a 4)))
(.f64 (.f64 1/4 x-scale) (*.f64 a 4))
(.f64 (.f64 x-scale 1/4) (*.f64 a 4))

Compiler

Compiled 294 to 218 computations (25.9% saved)

soundness3.3s (2.3%)

Algorithm

15×	egg-herbie

Rules

1766×	`associate-r`
1650×	`add-sqr-sqrt`
1650×	`add-sqr-sqrt`
1650×	`add-sqr-sqrt`
1632×	`*-un-lft-identity`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	60	583
1	157	557
2	639	557
3	5305	553
0	1366	284496
1	5051	284488
0	10	32
1	197	18
2	2139	18
0	60	583
1	157	557
2	639	557
3	5305	553
0	1366	284496
1	5051	284488
0	556	31580
1	1922	31478
0	28	212
1	590	146
2	7583	146
0	385	12367
1	1003	11655
2	4645	11643
0	60	583
1	157	557
2	639	557
3	5305	553
0	1366	284496
1	5051	284488
0	10	32
1	197	18
2	2139	18
0	10	22
1	203	20
2	2095	20
0	163	2123
1	386	1645
2	1385	1519
3	7197	1519
0	60	583
1	157	557
2	639	557
3	5305	553
0	1366	284496
1	5051	284488
0	638	44280
1	2017	42628
0	60	583
1	157	557
2	639	557
3	5305	553
0	1366	284496
1	5051	284488
0	10	32
1	197	18
2	2139	18
0	10	22
1	203	20
2	2095	20
0	163	2123
1	386	1645
2	1385	1519
3	7197	1519

Stop Event

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

Compiler

Compiled 2736 to 1863 computations (31.9% saved)

end132.0ms (0.1%)

Compiler: Compiled 269 to 188 computations (30.1% saved)